Metrics for raw-angle from scale-rotated-ellipse

start0.0ms (0%)

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

analyze1.4s (5.3%)

Memory

74.3MiB live, 1 324.5MiB allocated; 897ms 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)

sample7.3s (28%)

Memory

139.3MiB live, 9 927.4MiB allocated; 2.5s collecting garbage

Samples

2.5s	2 712×	1	valid
1.8s	1 214×	2	valid
1.7s	4 196×	0	valid
248.0ms	134×	3	valid
27.0ms	98×	0	invalid

Precisions

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

ival-pow2: 1.6s (27.5% of total)

ival-cosu: 889.0ms (15.5% of total)

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

ival-div!: 687.0ms (12% of total)

ival-mult!: 682.0ms (11.9% of total)

adjust: 556.0ms (9.7% of total)

ival-sub!: 270.0ms (4.7% of total)

ival-sqrt: 116.0ms (2% of total)

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

ival-atan: 83.0ms (1.4% of total)

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

Bogosity

preprocess52.0ms (0.2%)

Memory

-3.5MiB live, 50.0MiB allocated; 7ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	452	3593
1	2185	3573

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

▶

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

Compiler

Compiled 276 to 90 computations (67.4% saved)

series580.0ms (2.2%)

Memory

25.2MiB live, 962.7MiB allocated; 121ms collecting garbage

Counts

45 → 379

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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow a 2) (+ (* -1/4 (/ (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (+ (* -2 (pow a 2)) (* 2 (pow b 2)))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (pow b 2)))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (pow a 2) #s(hole binary64 (pow a 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) x-scale)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (sin (* 1/180 (* angle (PI))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2)))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* -2 (pow a 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow a 2) (- (* 2 (/ (pow b 2) (pow a 2))) 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (/ (pow (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow b 2) (+ (* -1/4 (/ (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow b 2) (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) x-scale))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* 2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2))) (* 2 (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow b 2) (+ 2 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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))))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow angle 2) (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/90 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* 2 (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* 2 (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/17496000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/90 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/17496000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/11337408000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/17496000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/15427944806400000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/11337408000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (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 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (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 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (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)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (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 (/ (- (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (/ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))))) (pow x-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -2 (* (pow x-scale 2) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* y-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 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (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))) (sqrt (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 b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (- (pow b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 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 (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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) (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))))) (pow y-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -2 (* (pow y-scale 2) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (- (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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/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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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)))))))))))))

Calls

15 calls:

Time	Variable		Point	Expression
45.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))
44.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))
44.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))
43.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))
34.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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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))

rewrite580.0ms (2.2%)

Memory

-8.4MiB live, 896.2MiB allocated; 153ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2510	103756
0	2597	95789
0	9098	93732

Stop Event

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

Counts

424 → 476

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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow a 2) (+ (* -1/4 (/ (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (+ (* -2 (pow a 2)) (* 2 (pow b 2)))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (pow b 2)))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (pow a 2) #s(hole binary64 (pow a 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) x-scale)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (sin (* 1/180 (* angle (PI))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2)))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* -2 (pow a 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow a 2) (- (* 2 (/ (pow b 2) (pow a 2))) 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (/ (pow (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow b 2) (+ (* -1/4 (/ (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow b 2) (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) x-scale))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* 2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2))) (* 2 (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow b 2) (+ 2 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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))))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow angle 2) (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/90 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* 2 (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* 2 (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/17496000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/90 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/17496000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/11337408000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/17496000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/15427944806400000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/11337408000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (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 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (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 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (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)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (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 (/ (- (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (/ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))))) (pow x-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -2 (* (pow x-scale 2) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* y-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 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (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))) (sqrt (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 b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (- (pow b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 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 (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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) (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))))) (pow y-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -2 (* (pow y-scale 2) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (- (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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/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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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)))))))))))))

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 (fabs.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))))
(fabs.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 (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (.f64 a a) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 a (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) x-scale)))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (fma.f64 #s(literal -2 binary64) (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (fma.f64 #s(literal -2 binary64) (.f64 (.f64 a a) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (.f64 #s(literal 2 binary64) (.f64 b b)))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (fma.f64 #s(literal -2 binary64) (.f64 a a) (.f64 #s(literal 2 binary64) (*.f64 b b))))
#s(approx (- (pow b 2) (pow a 2)) (*.f64 b b))
#s(approx (- (pow b 2) (pow a 2)) (fma.f64 #s(literal -1 binary64) (.f64 a a) (.f64 b b)))
#s(approx (pow a 2) (*.f64 a a))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (+.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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 a a)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 a a)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 a a)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 a a)) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 (.f64 a a) (-.f64 (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (*.f64 x-scale y-scale)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) x-scale)))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (*.f64 a a) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (.f64 #s(literal -2 binary64) (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 a a))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (.f64 #s(literal -2 binary64) (.f64 (.f64 a a) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 a a))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (.f64 #s(literal -2 binary64) (.f64 a a)))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 a a))) #s(literal 2 binary64))))
#s(approx (- (pow b 2) (pow a 2)) (.f64 #s(literal -1 binary64) (.f64 a a)))
#s(approx (- (pow b 2) (pow a 2)) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 b b) (.f64 a a)) #s(literal 1 binary64))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 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)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 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)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 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)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 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)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (.f64 b b) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 b (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (- (pow b 2) (pow a 2)) (-.f64 (.f64 b b) (.f64 a a)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (/.f64 (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (+.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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 (.f64 b b) (-.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 b b)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 b b)) (.f64 #s(literal 2 binary64) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (.f64 (.f64 b b) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (*.f64 b b))))))
#s(approx (- (pow b 2) (pow a 2)) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (*.f64 b b))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (fma.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (fma.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (fma.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 (.f64 angle angle) (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 4 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (*.f64 x-scale y-scale)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/22674816000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (fma.f64 #s(literal 1/4534963200000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/2267481600000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)))))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (fma.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (fma.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale))))))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/22674816000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (fma.f64 #s(literal 1/4534963200000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/2267481600000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (*.f64 x-scale y-scale)))))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))) x-scale)))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/22674816000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (fma.f64 #s(literal 1/4534963200000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (.f64 #s(literal 1/2267481600000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale))))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale)))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (fma.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (fma.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale)))))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/22674816000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (fma.f64 #s(literal 1/4534963200000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (.f64 #s(literal 1/2267481600000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (*.f64 a a))) x-scale))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (.f64 #s(literal 1/90 binary64) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/881596846080000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/4407984230400000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/30855889612800000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (*.f64 a a))))))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/11337408000000 binary64) (.f64 (.f64 angle angle) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/15427944806400000000 binary64) (.f64 (.f64 angle angle) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 1/11337408000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 x-scale x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 x-scale x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 x-scale x-scale)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (pow.f64 (.f64 x-scale (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (pow.f64 (.f64 x-scale (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 x-scale x-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 x-scale (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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 x-scale (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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 x-scale (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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 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))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 x-scale x-scale)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.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)))) (/ (/ (* (* (* 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 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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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/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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.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)))) (/ (/ (* (* (* 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 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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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/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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (*.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 (-.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 y-scale y-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 y-scale y-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 y-scale y-scale)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (pow.f64 (.f64 y-scale (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (pow.f64 (.f64 y-scale (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (-.f64 (.f64 (.f64 y-scale y-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))))))

eval140.0ms (0.5%)

Memory: -5.1MiB live, 281.0MiB allocated; 66ms collecting garbage
Compiler: Compiled 69 638 to 6 060 computations (91.3% saved)

prune116.0ms (0.4%)

Memory

12.1MiB live, 234.0MiB allocated; 48ms collecting garbage

Pruning

28 alts after pruning (28 fresh and 0 done)

	Pruned	Kept	Total
New	411	28	439
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	412	28	440

Accuracy

54.6%

Counts

440 → 28

Alt Table

Click to see full alt table

Status	Accuracy	Program
	11.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 #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)))
	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 #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)))
	14.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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.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)) (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)))
	13.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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)))
▶	11.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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.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 #s(approx ( a (sin (* (/ angle 180) (PI)))) (.f64 #s(literal 1/180 binary64) (.f64 a (.f64 angle (PI.f64))))) #s(literal 2 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 #s(approx ( a (sin (* (/ angle 180) (PI)))) (.f64 #s(literal 1/180 binary64) (.f64 a (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	14.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 #s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (cos.f64 #s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (cos.f64 #s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) x-scale) y-scale))) (PI.f64)))
	12.0%	(.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)))
	14.0%	(.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)))
	15.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 #s(approx (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #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))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	14.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 #s(approx (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) #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(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	14.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 #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))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) #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(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	14.5%	(.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 #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)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	2.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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.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 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.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)))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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)))
▶	17.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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)))
	18.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 #s(literal -1 binary64) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (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)) (.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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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.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 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)))))))))) (PI.f64)))
	20.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.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)))
	2.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))
▶	28.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.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)))
	20.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 (-.f64 (/.f64 (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)))
	26.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 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))

Compiler

Compiled 9 030 to 4 070 computations (54.9% saved)

series1.6s (6.1%)

Memory

-96.9MiB live, 1 700.5MiB allocated; 1.1s collecting garbage

Counts

133 → 1 065

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

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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))) (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1/2 (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (+ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (+ (* (pow a 2) (- (+ (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (+ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* 90 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (+ (* 90 (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))))) (* 90 (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (+ (* 90 (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))) (* (pow a 2) (+ (* 90 (* (pow a 2) (- (* -1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))) (* -1 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))) (pow b 2)))))) (* 90 (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (- (+ (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2))))) (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow a 2) (- (* -1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))) (* -1 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2))))) (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 2) (+ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* x-scale (* y-scale (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (+ (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow a 2) (+ (* -1/2 (/ (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow a 2) (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow a 2) (- (+ (* -1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ 1 (pow y-scale 2))) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow a 2) (- (+ (* (pow a 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (* a a) (* y-scale y-scale)) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (sqrt (/ (pow b 4) (pow x-scale 4)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow b 4) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 2) (pow y-scale 4)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow a 2) (+ (* -1 (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow a 2) (+ (* -1 (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow a 2) (+ (* -1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (+ (* -2 (pow a 2)) (* 2 (pow b 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (/ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow a 2) (+ (* -1/4 (/ (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 4))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow a 6))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow a 6) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1 (/ (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 6))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* -1/2 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow a 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow a 2))) (+ (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow a 4)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 90 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))))) (pow a 4))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 90 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))))) (pow a 4))) (+ (* 90 (/ (- (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))))) (* -1 (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))))))))) (pow a 6))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4)))))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))))) (+ (* -1 (/ (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))) (pow a 4))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* (pow a 2) (* angle (PI))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))))) (+ (* -1 (/ (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))))))) (pow a 6))) (+ (* -1 (/ (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))) (pow a 4))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* (pow a 2) (* angle (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* x-scale (* y-scale (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (+ (* -1/2 (/ (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (+ (* -1/2 (/ (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (pow a 2))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ 1 (pow y-scale 2))) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (/ 1 (pow y-scale 2))) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (sqrt (/ 1 (pow y-scale 4))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow a 4) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow y-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow a 4) (pow x-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (* (pow a 2) (pow x-scale 2))) (/ 1 (pow y-scale 2))))))
#s(approx (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -1 (/ (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow a 2)))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow a 2))) (* -1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow a 2))) (+ (* -1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) x-scale)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (sin (* 1/180 (* angle (PI))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2)))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* -2 (pow a 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow a 2) (- (* 2 (/ (pow b 2) (pow a 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1/2 (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (+ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (+ (* 2 (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))
#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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* 90 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (+ (* 90 (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))))) (* 90 (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (+ (* 90 (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))) (* (pow b 2) (+ (* 90 (* (pow b 2) (- (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))) (* -1 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))) (pow a 2)))))) (* 90 (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (- (+ (* (pow b 2) (- (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* (pow b 2) (- (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))) (* -1 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))))) (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))) (* -1/2 (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))) (* (pow b 2) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* x-scale (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* (pow b 2) (+ (* -1 (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* -1/2 (/ (* (pow b 2) (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* (pow b 2) (+ (* -1 (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow b 2) (+ (* -1/2 (/ (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* (pow b 2) (- (* -1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* (pow b 2) (- (* (pow b 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (sqrt (/ (pow a 4) (pow y-scale 4)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ 1 (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 2) (pow x-scale 4)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (/ (pow (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow b 2) (+ (* -1 (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow b 2) (+ (* -1 (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow b 2) (+ (* -1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (/ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 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)))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (* 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #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 (* b (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* b (sin (* 1/180 (* angle (PI)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow b 4) #s(hole binary64 (pow b 4)))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow b 2) (+ (* -1/4 (/ (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))) (pow b 6))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow b 6) (* x-scale (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow b 6))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow b 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow b 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow b 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow b 6) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow b 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 2))) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 2))) (+ (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow b 4)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* 90 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))))) (pow b 4))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* 90 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))))) (pow b 4))) (+ (* 90 (/ (- (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))))) (* -1 (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))))))))) (pow b 6))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (pow b 4) (* (PI) (sqrt (/ 1 (pow x-scale 4)))))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))))) (+ (* -1 (/ (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))) (pow b 4))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (* (pow b 2) (PI))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (pow b 4) (* (PI) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* angle (* (pow b 6) (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))))) (+ (* -1 (/ (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))))))) (pow b 6))) (+ (* -1 (/ (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))) (pow b 4))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (* (pow b 2) (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* (pow b 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (pow b 2))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (pow b 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* x-scale (* y-scale (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (pow b 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* (pow b 2) (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))) (pow b 2))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))) (pow b 2)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))) (pow b 2))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -1 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (* (pow b 2) (pow y-scale 2))) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ 1 (pow x-scale 2)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ 1 (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ 1 (pow x-scale 2)))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (sqrt (/ 1 (pow x-scale 4))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow x-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow b 4) (pow y-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (/ 1 (pow x-scale 2))))))
#s(approx (* 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 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -1 (/ (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow b 2)))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow b 2))) (* -1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow b 2))) (+ (* -1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow b 2) (+ (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) x-scale))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* 2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2))) (* 2 (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow b 2) (+ 2 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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))))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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))))))) (* 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/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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 (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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))))))) (* 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/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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))))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* (pow angle 2) (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* (pow angle 2) (+ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* (pow angle 2) (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* (pow angle 2) (+ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* (pow angle 2) (+ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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)))))))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (pow b 2))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (pow b 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))) (pow b 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))) (pow b 2)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (sqrt (pow b 4))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (sqrt (pow b 4))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* 2 (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) (pow b 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow angle 2) (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2))))) (pow b 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow angle 2) (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (+ (* (pow angle 2) (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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 (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)))))) (pow b 4))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 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 (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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (* (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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4)))))))) (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* -1 (+ (* -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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4))))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4))))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (* -1 (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 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))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4)))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 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))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4)))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (/ (* (* (* 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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (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))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))) (* (pow b 2) (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (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 b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))))))) angle)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))) (* (pow b 2) (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (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 b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI)))))))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))) angle)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow angle 2) (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow angle 2) (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow angle 2) (* x-scale (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow angle 2) (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow angle 2) (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow angle 2) (+ (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (* (pow angle 2) (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))))))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow angle 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow angle 2) (- (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow angle 2) (- (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (- (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 2))) (pow y-scale 2)))))
#s(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 4))) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))
#s(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (pow y-scale 2))))))))
#s(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))))))))
#s(approx (pow (* b (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (pow (* b (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (pow (PI) 4)))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))
#s(approx (pow (* b (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* b (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* b (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 1/180 (* angle (* b (PI))))))
#s(approx (* b (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (pow (PI) 3)))) (* 1/180 (* b (PI)))))))
#s(approx (* b (sin (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (pow (PI) 7)))) (* 1/22674816000000 (* b (pow (PI) 5)))))))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow angle 2) (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)))))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 4) (pow (PI) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 4) (pow (PI) 2))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))) (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (+ (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow angle 2) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (+ (* 1/2267481600000 (pow (PI) 5)) (* (pow angle 2) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))))))))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* 2 (/ (* (pow angle 2) (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* (pow angle 2) (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 2))) (pow x-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow angle 2) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (pow x-scale 2)))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/180 (* angle (* (pow b 2) (PI))))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow b 2) (PI))) (* (pow angle 2) (* (pow b 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow b 2) (PI))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))))) (* (pow b 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow b 2) (PI))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7))))))) (* (pow b 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow b 2) (sqrt (/ 1 (pow x-scale 4)))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (sqrt (/ 1 (pow x-scale 4))))) (* 1/2 (/ (* (pow b 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (/ 1 (pow x-scale 4))))))) (* (pow b 2) (sqrt (/ 1 (pow x-scale 4)))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow b 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))))) (sqrt (/ 1 (pow x-scale 4))))) (* 1/2 (/ (* (pow b 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow b 2) (sqrt (/ 1 (pow x-scale 4)))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ 1 (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (sqrt (/ 1 (pow x-scale 4))))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ 1 (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* (pow angle 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ 1 (pow x-scale 2))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))))))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))) (/ 1 (pow x-scale 2)))))
#s(approx (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow y-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow y-scale 2))))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 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)))
#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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (/ (/ (* (* (* 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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* 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))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* 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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (* (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -45 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -45 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* -45 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* angle (* y-scale (* (PI) (* (pow (sqrt (pow b 4)) 3) (- (pow b 2) (pow a 2))))))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* angle (* y-scale (* (PI) (* (pow (sqrt (pow b 4)) 3) (- (pow b 2) (pow a 2)))))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (sqrt (pow b 4)))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* y-scale (pow (sqrt (pow b 4)) 3))))))))) x-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (sqrt (pow b 4)))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* y-scale (pow (sqrt (pow b 4)) 3))))))))) (pow x-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (/ (pow a 2) (pow y-scale 2))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))) (/ (pow a 2) (pow y-scale 2))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* -1 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (* (pow y-scale 2) (sqrt (pow b 4))))) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))))) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))))) (pow b 2))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (sqrt (pow b 4)) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* -1 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (* (pow y-scale 2) (sqrt (pow b 4)))))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4))))))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4))))))))) (pow x-scale 2))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (pow y-scale 2))) (pow b 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (/ (* (pow a 4) (pow x-scale 2)) (pow y-scale 4)))) (pow b 4)) (pow x-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (pow b 2)) (pow x-scale 2))))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (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 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (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)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (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 (/ (- (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))) x-scale)))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))) (pow x-scale 2))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 2))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4)))))) (pow x-scale 4))))
#s(approx (* (* x-scale x-scale) (* y-scale y-scale)) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4))))) (pow x-scale 4))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (/ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))))) (pow x-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow x-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (* (pow b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow x-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 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 (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -45 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow a 4) (pow y-scale 4)) (/ (pow b 4) (pow x-scale 4))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* x-scale (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* x-scale (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* x-scale (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (+ (* 1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* (pow b 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* (pow b 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* (pow b 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 45 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (+ (* 1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* -1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* y-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 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (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))) (sqrt (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 b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (- (pow b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 2) (pow a 2)))))))))))) y-scale)))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -90 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* -45 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2)))))))))) y-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -90 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -45 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))) (* -45 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* angle (* x-scale (* (PI) (* (pow (sqrt (pow a 4)) 3) (- (pow b 2) (pow a 2))))))))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))))) (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* angle (* x-scale (* (PI) (* (pow (sqrt (pow a 4)) 3) (- (pow b 2) (pow a 2)))))))))))) (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* x-scale (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* x-scale (- (pow a 2) (sqrt (pow a 4))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (sqrt (pow a 4))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* x-scale (pow (sqrt (pow a 4)) 3))))))))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (pow a 2) (sqrt (pow a 4))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (+ (* -1 (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))))) (pow a 2)) (sqrt (pow a 4))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (+ (* -1 (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* -1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))))) (pow a 2)) (sqrt (pow a 4))) y-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (pow a 2) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (sqrt (pow a 4)) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (/ (pow b 2) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))) (/ (pow b 2) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* -1 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (* (pow x-scale 2) (sqrt (pow a 4)))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4))))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4))))))))) (pow y-scale 2))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (pow x-scale 2))) (pow a 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (/ (* (pow b 4) (pow y-scale 2)) (pow x-scale 4)))) (pow a 4)) (pow y-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2)) (pow a 2)) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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) (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) y-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))) y-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))))))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))) y-scale)))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) y-scale)))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) y-scale)))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) y-scale)))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) y-scale)))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow y-scale 2))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow y-scale 2))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow y-scale 2))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 2))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (/ (* (pow b 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 4)))))) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (/ (* (pow b 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 4))))) (pow y-scale 4))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))))) (pow y-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow y-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (* (pow b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow y-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 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 (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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/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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -45 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* x-scale (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (/ (pow a 2) (pow y-scale 2))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (+ (* -1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow a 2) (pow y-scale 2)))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* -1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow a 2) (pow y-scale 2))))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (+ (* -1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (+ (* -1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* (pow b 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (* (pow b 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* (pow b 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (* (pow b 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* (pow b 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 45 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))) (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* x-scale (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (* 1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (+ (* 1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (* 1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))) (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* -1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1 (/ (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (pow y-scale 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1 (/ (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (pow y-scale 2))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1 (/ (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (pow y-scale 2))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))

Calls

15 calls:

Time	Variable		Point	Expression
443.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 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) (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* b (sin (* 1/180 (* angle (PI))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (pow b 4) (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (* (* b b) (* (cos (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-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) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2))
104.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 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) (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* b (sin (* 1/180 (* angle (PI))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (pow b 4) (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (* (* b b) (* (cos (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-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) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2))
104.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 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) (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* b (sin (* 1/180 (* angle (PI))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (pow b 4) (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (* (* b b) (* (cos (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-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) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2))
85.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 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) (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* b (sin (* 1/180 (* angle (PI))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (pow b 4) (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (* (* b b) (* (cos (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-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) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2))
82.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 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) (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* b (sin (* 1/180 (* angle (PI))))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (pow b 4) (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (* (* b b) (* (cos (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-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) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (pow (sin (* 1/180 (* angle (PI)))) 2))

rewrite1.0s (3.9%)

Memory

71.9MiB live, 1 216.7MiB allocated; 250ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	7042	243610
0	7290	229531
0	9985	225370

Stop Event

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

Counts

1 198 → 1 308

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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))))
y-scale
(+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
(sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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)))
(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)
#s(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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
(+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.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 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 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))
(.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))
#s(literal -1 binary64)
(/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
(.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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)))))))))) (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 (.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)))))))))) (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 (.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)) (.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 #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(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 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 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 (pow.f64 (.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 (.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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(+.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)))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.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(literal 4 binary64)
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(pow.f64 b #s(literal 4 binary64))
(pow.f64 (.f64 (cos.f64 (.f64 #s(literal 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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))
(/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))
(.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 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 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 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)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 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)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)))))))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
(+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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))))))
(.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)))))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
(fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))
(pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 (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))
#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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))) (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1/2 (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (+ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (+ (* (pow a 2) (- (+ (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (+ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* 90 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (+ (* 90 (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))))) (* 90 (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (+ (* 90 (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))) (* (pow a 2) (+ (* 90 (* (pow a 2) (- (* -1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))) (* -1 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))) (pow b 2)))))) (* 90 (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (- (+ (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2))))) (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow a 2) (- (* -1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))) (* -1 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2))))) (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 2) (+ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* x-scale (* y-scale (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (+ (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow a 2) (+ (* -1/2 (/ (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow a 2) (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow a 2) (- (+ (* -1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ 1 (pow y-scale 2))) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow a 2) (- (+ (* (pow a 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (* a a) (* y-scale y-scale)) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (sqrt (/ (pow b 4) (pow x-scale 4)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow b 4) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 2) (pow y-scale 4)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (* 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow a 2) (+ (* -1 (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow a 2) (+ (* -1 (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow a 2) (+ (* -1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (+ (* -2 (pow a 2)) (* 2 (pow b 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (/ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow a 2) (+ (* -1/4 (/ (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 4))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow a 6))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow a 6) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1 (/ (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 6))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* -1/2 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow a 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow a 2))) (+ (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow a 4)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 90 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))))) (pow a 4))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 90 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))))) (pow a 4))) (+ (* 90 (/ (- (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))))) (* -1 (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))))))))) (pow a 6))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4)))))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))))) (+ (* -1 (/ (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))) (pow a 4))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* (pow a 2) (* angle (PI))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))))) (+ (* -1 (/ (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))))))) (pow a 6))) (+ (* -1 (/ (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))) (pow a 4))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* (pow a 2) (* angle (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* x-scale (* y-scale (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (+ (* -1/2 (/ (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (+ (* -1/2 (/ (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (pow a 2))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ 1 (pow y-scale 2))) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (/ 1 (pow y-scale 2))) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (sqrt (/ 1 (pow y-scale 4))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow a 4) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow y-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow a 4) (pow x-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (* (pow a 2) (pow x-scale 2))) (/ 1 (pow y-scale 2))))))
#s(approx (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -1 (/ (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow a 2)))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow a 2))) (* -1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow a 2))) (+ (* -1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) x-scale)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (sin (* 1/180 (* angle (PI))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2)))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* -2 (pow a 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow a 2) (- (* 2 (/ (pow b 2) (pow a 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1/2 (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (+ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (+ (* 2 (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))
#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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* 90 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (+ (* 90 (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))))) (* 90 (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (+ (* 90 (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))) (* (pow b 2) (+ (* 90 (* (pow b 2) (- (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))) (* -1 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))) (pow a 2)))))) (* 90 (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (- (+ (* (pow b 2) (- (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* (pow b 2) (- (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))) (* -1 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))))) (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))) (* -1/2 (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))) (* (pow b 2) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* x-scale (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* (pow b 2) (+ (* -1 (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* -1/2 (/ (* (pow b 2) (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* (pow b 2) (+ (* -1 (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow b 2) (+ (* -1/2 (/ (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* (pow b 2) (- (* -1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* (pow b 2) (- (* (pow b 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (sqrt (/ (pow a 4) (pow y-scale 4)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ 1 (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 2) (pow x-scale 4)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (/ (pow (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow b 2) (+ (* -1 (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow b 2) (+ (* -1 (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow b 2) (+ (* -1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (/ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 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)))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (* 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #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 (* b (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* b (sin (* 1/180 (* angle (PI)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow b 4) #s(hole binary64 (pow b 4)))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow b 2) (+ (* -1/4 (/ (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))) (pow b 6))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow b 6) (* x-scale (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow b 6))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow b 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow b 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow b 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow b 6) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow b 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 2))) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 2))) (+ (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow b 4)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* 90 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))))) (pow b 4))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* 90 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))))) (pow b 4))) (+ (* 90 (/ (- (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))))) (* -1 (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))))))))) (pow b 6))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (pow b 4) (* (PI) (sqrt (/ 1 (pow x-scale 4)))))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))))) (+ (* -1 (/ (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))) (pow b 4))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (* (pow b 2) (PI))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (pow b 4) (* (PI) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* angle (* (pow b 6) (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))))) (+ (* -1 (/ (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))))))) (pow b 6))) (+ (* -1 (/ (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))) (pow b 4))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (* (pow b 2) (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* (pow b 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (pow b 2))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (pow b 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* x-scale (* y-scale (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (pow b 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* (pow b 2) (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))) (pow b 2))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))) (pow b 2)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))) (pow b 2))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -1 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (* (pow b 2) (pow y-scale 2))) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ 1 (pow x-scale 2)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ 1 (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ 1 (pow x-scale 2)))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (sqrt (/ 1 (pow x-scale 4))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow x-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow b 4) (pow y-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (/ 1 (pow x-scale 2))))))
#s(approx (* 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 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -1 (/ (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow b 2)))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow b 2))) (* -1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow b 2))) (+ (* -1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow b 2) (+ (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) x-scale))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* 2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2))) (* 2 (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow b 2) (+ 2 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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))))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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))))))) (* 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/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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 (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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))))))) (* 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/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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))))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* (pow angle 2) (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* (pow angle 2) (+ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* (pow angle 2) (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* (pow angle 2) (+ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* (pow angle 2) (+ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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)))))))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (pow b 2))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (pow b 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))) (pow b 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))) (pow b 2)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (sqrt (pow b 4))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (sqrt (pow b 4))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* 2 (* (pow angle 2) (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) (pow b 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow angle 2) (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2))))) (pow b 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow angle 2) (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (+ (* (pow angle 2) (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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 (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)))))) (pow b 4))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 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 (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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (* (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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4)))))))) (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* -1 (+ (* -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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4))))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4))))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (* -1 (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 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))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4)))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 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))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4)))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (/ (* (* (* 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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (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))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))) (* (pow b 2) (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (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 b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))))))) angle)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))) (* (pow b 2) (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (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 b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI)))))))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))) angle)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow angle 2) (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow angle 2) (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow angle 2) (* x-scale (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow angle 2) (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow angle 2) (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow angle 2) (+ (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (* (pow angle 2) (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))))))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow angle 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow angle 2) (- (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow angle 2) (- (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (- (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 2))) (pow y-scale 2)))))
#s(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 4))) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))
#s(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (pow y-scale 2))))))))
#s(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))))))))
#s(approx (pow (* b (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (pow (* b (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (pow (PI) 4)))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))
#s(approx (pow (* b (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* b (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* b (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 1/180 (* angle (* b (PI))))))
#s(approx (* b (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (pow (PI) 3)))) (* 1/180 (* b (PI)))))))
#s(approx (* b (sin (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (pow (PI) 7)))) (* 1/22674816000000 (* b (pow (PI) 5)))))))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow angle 2) (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)))))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 4) (pow (PI) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 4) (pow (PI) 2))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))) (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))) (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (+ (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow angle 2) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/11664000 (pow (PI) 3)) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (+ (* 1/2267481600000 (pow (PI) 5)) (* (pow angle 2) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))))))))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* 2 (/ (* (pow angle 2) (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2))) (* (pow angle 2) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* (pow angle 2) (+ (* 2 (* (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2)))))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 2))) (pow x-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow angle 2) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (pow x-scale 2)))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/180 (* angle (* (pow b 2) (PI))))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow b 2) (PI))) (* (pow angle 2) (* (pow b 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow b 2) (PI))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))))) (* (pow b 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow b 2) (PI))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7))))))) (* (pow b 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow b 2) (sqrt (/ 1 (pow x-scale 4)))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (sqrt (/ 1 (pow x-scale 4))))) (* 1/2 (/ (* (pow b 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (/ 1 (pow x-scale 4))))))) (* (pow b 2) (sqrt (/ 1 (pow x-scale 4)))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (* (pow b 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))))) (sqrt (/ 1 (pow x-scale 4))))) (* 1/2 (/ (* (pow b 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))) (* (pow b 2) (sqrt (/ 1 (pow x-scale 4)))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ 1 (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (sqrt (/ 1 (pow x-scale 4))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (sqrt (/ 1 (pow x-scale 4))))) (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ 1 (pow x-scale 4))) (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (sqrt (/ 1 (pow x-scale 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (sqrt (/ 1 (pow x-scale 4))))) (* 1/2 (/ (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ 1 (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* (pow angle 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* (pow angle 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (/ 1 (pow x-scale 4)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ 1 (pow x-scale 2))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))))))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))))) (/ 1 (pow x-scale 2)))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))) (/ 1 (pow x-scale 2)))))
#s(approx (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow y-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow y-scale 2))))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) #s(hole binary64 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 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)))
#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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (/ (/ (* (* (* 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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* 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))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* 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)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (* (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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -45 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -45 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* -45 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* angle (* y-scale (* (PI) (* (pow (sqrt (pow b 4)) 3) (- (pow b 2) (pow a 2))))))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* angle (* y-scale (* (PI) (* (pow (sqrt (pow b 4)) 3) (- (pow b 2) (pow a 2)))))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (sqrt (pow b 4)))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* y-scale (pow (sqrt (pow b 4)) 3))))))))) x-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (sqrt (pow b 4)))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* y-scale (pow (sqrt (pow b 4)) 3))))))))) (pow x-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (/ (pow a 2) (pow y-scale 2))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))) (/ (pow a 2) (pow y-scale 2))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* -1 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (* (pow y-scale 2) (sqrt (pow b 4))))) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))))) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))))) (pow b 2))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (sqrt (pow b 4)) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* -1 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (* (pow y-scale 2) (sqrt (pow b 4)))))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4))))))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4))))))))) (pow x-scale 2))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (pow y-scale 2))) (pow b 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (/ (* (pow a 4) (pow x-scale 2)) (pow y-scale 4)))) (pow b 4)) (pow x-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (pow b 2)) (pow x-scale 2))))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (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 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (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)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (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 (/ (- (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))) x-scale)))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))) (pow x-scale 2))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) (pow x-scale 2))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4)))))) (pow x-scale 4))))
#s(approx (* (* x-scale x-scale) (* y-scale y-scale)) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4))))) (pow x-scale 4))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (/ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))))) (pow x-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow x-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (* (pow b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow x-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 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 (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (pow x-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -45 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow a 4) (pow y-scale 4)) (/ (pow b 4) (pow x-scale 4))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* x-scale (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* x-scale (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* x-scale (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (+ (* 1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* (pow b 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* (pow b 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* (pow b 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2))))) (* (pow x-scale 6) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 45 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (+ (* 1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* -1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* y-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 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (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))) (sqrt (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 b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (- (pow b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 2) (pow a 2)))))))))))) y-scale)))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -90 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* -45 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2)))))))))) y-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -90 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -45 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))) (* -45 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* angle (* x-scale (* (PI) (* (pow (sqrt (pow a 4)) 3) (- (pow b 2) (pow a 2))))))))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))))) (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* angle (* x-scale (* (PI) (* (pow (sqrt (pow a 4)) 3) (- (pow b 2) (pow a 2)))))))))))) (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* x-scale (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* x-scale (- (pow a 2) (sqrt (pow a 4))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (sqrt (pow a 4))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* x-scale (pow (sqrt (pow a 4)) 3))))))))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (pow a 2) (sqrt (pow a 4))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (+ (* -1 (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))))) (pow a 2)) (sqrt (pow a 4))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (+ (* -1 (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* -1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))))) (pow a 2)) (sqrt (pow a 4))) y-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (pow a 2) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (sqrt (pow a 4)) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (/ (pow b 2) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))) (/ (pow b 2) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* -1 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (* (pow x-scale 2) (sqrt (pow a 4)))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4))))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4))))))))) (pow y-scale 2))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (pow x-scale 2))) (pow a 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (/ (* (pow b 4) (pow y-scale 2)) (pow x-scale 4)))) (pow a 4)) (pow y-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2)) (pow a 2)) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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) (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) y-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))) y-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))))))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))) y-scale)))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) y-scale)))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) y-scale)))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) y-scale)))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) y-scale)))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow y-scale 2))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow y-scale 2))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow y-scale 2))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (pow y-scale 2))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (/ (* (pow b 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 4)))))) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (/ (* (pow b 4) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 4))))) (pow y-scale 4))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))))) (pow y-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow y-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 2) (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (* (pow b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow y-scale 2))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 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 (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))) (* 1/2 (/ (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (pow y-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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/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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -45 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* x-scale (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (/ (pow a 2) (pow y-scale 2))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (+ (* -1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow a 2) (pow y-scale 2)))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* -1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow a 2) (pow y-scale 2))))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (+ (* -1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (+ (* -1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* (pow b 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (* (pow b 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* (pow b 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* (pow b 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (* (pow b 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* (pow b 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) #s(hole binary64 (+ (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))
#s(approx (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))
#s(approx (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 45 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))) (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* x-scale (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (* 1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (+ (* 1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (* 1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))) (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* -1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1 (/ (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (pow y-scale 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1 (/ (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (pow y-scale 2))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (+ (* -1 (/ (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (pow y-scale 2))) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))

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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (neg.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))))
y-scale
(+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
(pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fabs.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))
(.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(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))))
(pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(fma.f64 (.f64 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))))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(fma.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 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 (.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)
#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 (fabs.f64 (.f64 #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 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
#s(literal 90 binary64)
(/.f64 (neg.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))
(pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(fabs.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
(.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
(pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (-.f64 (/.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 (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 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))) (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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))
(.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))
#s(literal -1 binary64)
(/.f64 (neg.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/.f64 (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 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 (fabs.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.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)))))))))) (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 (.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))))))))))) (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 (.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)))))))))) (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 (.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)) (.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 #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(literal 1/2 binary64)
(/.f64 (neg.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))))))) (neg.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 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 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 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 (pow.f64 (.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 (neg.f64 (pow.f64 (.f64 b (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 (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)))
(.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(+.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)))
(pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1/2 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))))
(fabs.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
(fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))
(+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
#s(literal 4 binary64)
(/.f64 (neg.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(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 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(pow.f64 b #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 4 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 (cos.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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))
(/.f64 (neg.f64 (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 x-scale)))
(/.f64 (pow.f64 (.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 #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 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (/.f64 (.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 (-.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 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (/.f64 (.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)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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))))))) (/.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)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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))))))) (/.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)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)))))))) (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)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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))))))) (/.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)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)))))))
(-.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)
(fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(fma.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(.f64 (.f64 a a) (pow.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))
(.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))))
(pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))) #s(literal 2 binary64)))
(.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))))
(.f64 (.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))
(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))))
(/.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)
(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))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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))))))
(.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)))))
(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))))
(fabs.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))
(fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))
(/.f64 (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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 (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)))
#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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.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 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b))))) (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.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 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))) (.f64 b b))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))) (.f64 b b)))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (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 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (fma.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (fma.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (fma.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (fma.f64 (.f64 a a) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal 90 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 b b))))) (.f64 #s(literal 90 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 b b)))) (.f64 b b))))) (.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (*.f64 b b)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 (.f64 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 b b)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 (.f64 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 b b)))) (.f64 b b)))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 b b)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (*.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (*.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (fma.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 x-scale (*.f64 y-scale (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (*.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (fma.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 a a) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))
#s(approx (/ (* a a) (* y-scale y-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 a a) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
#s(approx (* 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 a a) (fma.f64 #s(literal -1 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 a a) (fma.f64 #s(literal -1 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (fma.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (fma.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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 (.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)) (-.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) y-scale)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) x-scale) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 x-scale (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(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 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 x-scale (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 a a) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 a a)))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 a a))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (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 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 a a)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/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) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/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) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/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) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 a a) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 a a) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 a a) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 a a)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 a a)) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 angle (PI.f64)))) (.f64 a a)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 angle (PI.f64)))) (.f64 a a))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 6 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 angle (PI.f64)))) (.f64 a a)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64)))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 angle (PI.f64))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 (.f64 a a) (*.f64 angle (PI.f64)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 angle (PI.f64))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 a a)) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 x-scale (.f64 y-scale (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 a a) (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (/.f64 (.f64 b b) (.f64 (.f64 a a) (*.f64 x-scale x-scale))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (/.f64 (.f64 b b) (.f64 (.f64 a a) (*.f64 x-scale x-scale)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (/.f64 (.f64 b b) (.f64 (.f64 a a) (*.f64 x-scale x-scale)))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 y-scale #s(literal -4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 a x-scale) #s(literal 4 binary64)))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))
#s(approx (* 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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (+.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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 a a))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 a a)) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 a a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (.f64 (.f64 a a) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/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) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/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) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (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 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/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) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (/ (/ (* (* (* 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)) (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 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)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 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)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 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)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 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)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.f64 (.f64 #s(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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.f64 (.f64 #s(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 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (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 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (fma.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (+.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 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (+.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) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (+.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) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 b b) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 #s(literal 90 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a))))) (.f64 #s(literal 90 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a)))) (.f64 a a))))) (.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (.f64 b b) (-.f64 (fma.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a)))) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (.f64 b b) (-.f64 (fma.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a)))) (.f64 a a)))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a)))) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 x-scale (.f64 y-scale (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 b b) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (fma.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (fma.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (fma.f64 (.f64 b b) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (.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 (* b (sin (* 1/180 (* angle (PI))))) (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (.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 (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 b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (.f64 (.f64 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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(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 (pow b 4) (pow.f64 b #s(literal 4 binary64)))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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 a a) (.f64 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 x-scale (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (+.f64 (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.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)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 x-scale (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (+.f64 (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.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))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 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)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 b b) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 b b)))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 b b))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 b b)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/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) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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)) (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/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) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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)) (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/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) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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)) (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (.f64 (.f64 b b) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 b b) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 b b) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 b b) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 b b)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 b b)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (*.f64 angle (PI.f64)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (PI.f64)))) (*.f64 b b)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (PI.f64)))) (.f64 b b))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 6 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (PI.f64)))) (*.f64 b b)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (*.f64 angle (PI.f64)))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (*.f64 b b) (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (PI.f64))))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (*.f64 b b) (PI.f64)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (PI.f64))))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (*.f64 b b) (PI.f64))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 b b)))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (*.f64 b b))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 x-scale (.f64 y-scale (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 b b)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))))) (.f64 b b)))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))))) (.f64 b b))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))))) (.f64 b b)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 b b) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 x-scale #s(literal -4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 b y-scale) #s(literal 4 binary64)))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))
#s(approx (* 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 (/.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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (/.f64 (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (+.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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 b b))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 b b)) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 b b)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (.f64 (.f64 b b) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/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) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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)) (.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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/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) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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)) (.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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/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) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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)) (.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 (- (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)) (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))))))) (.f64 (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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (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 (.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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #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 -1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (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 (.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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 (.f64 angle angle) (.f64 y-scale (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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 (.f64 angle angle) (fma.f64 y-scale (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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 (.f64 angle angle) (fma.f64 y-scale (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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 (.f64 angle angle) (fma.f64 y-scale (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (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)))))))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 b b)))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (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))) (fma.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 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 (.f64 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 b b))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (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))) (fma.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 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (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 (.f64 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 b b))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 b b) (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))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (/.f64 (.f64 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 (.f64 angle angle) (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 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (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))))))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))))) (pow.f64 (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))))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (*.f64 b b)))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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))) (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 (* 1/180 (* angle (PI))))) 2) (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))) (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 (* 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 (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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.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 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))))) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (*.f64 x-scale x-scale))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (.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 (.f64 b b) (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 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1 binary64) (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 (.f64 b b) (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 (*.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1 binary64) (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 (.f64 b b) (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 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale)))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (.f64 b b) (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 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (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 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))))) (/.f64 (.f64 (.f64 b b) (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 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (*.f64 (PI.f64) (PI.f64))))))))) angle))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (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 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64)))))))))) angle))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 (.f64 b b) (.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))))))) angle))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (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 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (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 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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) (PI.f64))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 (.f64 b b) (.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (*.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (.f64 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale x-scale)))))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 angle angle) (.f64 y-scale (-.f64 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 angle angle) (fma.f64 y-scale (-.f64 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 angle angle) (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 angle angle) (fma.f64 y-scale (-.f64 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 angle angle) (fma.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 angle angle) (.f64 y-scale (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale x-scale))))))))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 angle angle) (-.f64 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 angle angle) (-.f64 (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 angle angle) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))))
#s(approx (/ (pow (* b (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) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-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(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (.f64 (.f64 angle angle) (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 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)))))) (*.f64 y-scale y-scale)))))))
#s(approx (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (.f64 (.f64 angle angle) (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 angle angle) (+.f64 (/.f64 (.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 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale)))))))))
#s(approx (pow (* b (sin (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (*.f64 b (PI.f64)))))
#s(approx (* b (sin (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 b (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (.f64 b (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (.f64 (.f64 angle angle) (.f64 b (pow.f64 (PI.f64) #s(literal 7 binary64)))) (.f64 #s(literal 1/22674816000000 binary64) (.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.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)))))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/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)))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/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)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/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))))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.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 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64)))))
#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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (fma.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #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))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (fma.f64 (.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 (.f64 angle angle) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-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))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (fma.f64 (.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 (.f64 angle angle) (-.f64 (fma.f64 (.f64 angle angle) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-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))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (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 (.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 x-scale x-scale))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (/ (pow (* b (cos (* 1/180 (* angle (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 (.f64 angle angle) (+.f64 (/.f64 (.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 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 (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (.f64 b b) (PI.f64)) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (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 (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (.f64 b b) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (.f64 (.f64 b b) (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 b b) (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 (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (.f64 b b) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (.f64 (.f64 b b) (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 (.f64 b b) (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 b b) (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 (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (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 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (*.f64 a a) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) y-scale) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) y-scale))) (/.f64 (*.f64 a a) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) y-scale) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) y-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale))))) (/.f64 (*.f64 a a) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) y-scale) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) y-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale) (fma.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) y-scale) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale)))))) (/.f64 (.f64 a a) y-scale)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))))) (*.f64 a a)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (*.f64 a a)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (.f64 angle angle) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (*.f64 a a)))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64)))) (.f64 a a)))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (.f64 a a)))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 (.f64 a a) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 a a)))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (.f64 #s(literal -1/64800 binary64) (.f64 a (.f64 (.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (.f64 a (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/25194240000 binary64) (.f64 a (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (.f64 a (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (.f64 a (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 #s(literal 1/25194240000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.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 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) x-scale) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) x-scale)))))) (/.f64 (.f64 b b) x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 angle angle) (.f64 (.f64 b b) (-.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))))))) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))) (.f64 (*.f64 b b) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (.f64 angle angle) (.f64 (.f64 b b) (-.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 (-.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)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.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)))))) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))) (.f64 (*.f64 b b) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (.f64 b b) (-.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)))))) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 b b) (-.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 (.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 (-.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)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))))) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.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 (-.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)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))) (.f64 (*.f64 b b) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.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)))))) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 1/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 (-.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)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))) (.f64 #s(literal 1/2 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))))) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 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))))) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/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 (.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 (-.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)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/6298560000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.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 (-.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)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (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)) (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 (- (/ (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))) (/.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 (.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 (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 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))
#s(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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)))
#s(approx (/ (/ (* (* (* 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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.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)))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (.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))))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (+.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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.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) (pow.f64 (.f64 (cos.f64 (.f64 #s(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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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)) (-.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (- (/ (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 (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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (*.f64 a a)))))))))))) x-scale))
#s(approx x-scale x-scale)
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))) x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))))))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.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 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.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 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 b b))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (*.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (fma.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (*.f64 y-scale (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))) x-scale))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 x-scale x-scale))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) (.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (fma.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 y-scale (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))) (.f64 x-scale x-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (-.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 x-scale x-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* 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 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 x-scale x-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* 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/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (*.f64 x-scale x-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 b b))) (*.f64 x-scale x-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 b b))) (*.f64 x-scale x-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 b b))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) (*.f64 x-scale x-scale)))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (.f64 b b)) (.f64 x-scale x-scale)))
#s(approx (* x-scale x-scale) (*.f64 x-scale x-scale))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (cos.f64 (.f64 #s(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 (.f64 b (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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))))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (cos.f64 (.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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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))))))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (cos.f64 (.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 (.f64 b (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (cos.f64 (.f64 #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 (.f64 b (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (cos.f64 (.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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (/.f64 (.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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (cos.f64 (.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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))) (/.f64 (.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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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/2 binary64) (/.f64 (.f64 (.f64 x-scale 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 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))))))) x-scale))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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/2 binary64) (/.f64 (.f64 (.f64 x-scale 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 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))))) (.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))))))) (.f64 x-scale x-scale)))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (/.f64 (-.f64 (.f64 (.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 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (/.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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (.f64 b (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (/.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) (/.f64 (pow.f64 (.f64 b (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (.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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (*.f64 x-scale x-scale)))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))))) (.f64 x-scale x-scale)))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.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 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))) (.f64 x-scale x-scale)))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))))) (*.f64 x-scale x-scale)))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #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 (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (/.f64 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (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 (.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 x-scale x-scale)))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)))) (/.f64 (.f64 (.f64 b b) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b b) (.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)))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b b) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 x-scale x-scale)))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b b) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (.f64 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 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.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))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (.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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 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 (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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 x-scale (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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (-.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 x-scale (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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (.f64 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 x-scale (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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (.f64 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 x-scale x-scale)) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 x-scale x-scale)) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 x-scale (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 x-scale (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 x-scale (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (-.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.f64 (.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 (-.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.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 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.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 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.f64 (.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 (-.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.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 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.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 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (-.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (.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 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (/.f64 (pow.f64 (.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 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (.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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (.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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (.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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (.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 (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (.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)) (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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)))) (.f64 (.f64 b b) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 (.f64 b b) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 (.f64 b b) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (.f64 b b) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 (.f64 b b) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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)))) (/ (/ (* (* (* 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 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.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)))) (.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (.f64 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (.f64 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (*.f64 x-scale x-scale))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (*.f64 x-scale x-scale)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (*.f64 x-scale x-scale))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.f64 (.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 (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.f64 (.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 (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.f64 (.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 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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.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)))) (/ (/ (* (* (* 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 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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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/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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.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)))) (/ (/ (* (* (* 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 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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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/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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))))))) y-scale))
#s(approx y-scale y-scale)
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))) y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -45 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (.f64 b b) (*.f64 a a)))))))))) y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (.f64 (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (*.f64 a a))))))))))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (.f64 (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 x-scale (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))) y-scale))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 a a)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) (.f64 a a)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (.f64 y-scale y-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (-.f64 (fma.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (-.f64 (fma.f64 (.f64 y-scale y-scale) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (.f64 y-scale y-scale)))
#s(approx (* y-scale y-scale) (*.f64 y-scale y-scale))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 y-scale y-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 y-scale y-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 y-scale y-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 y-scale y-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))))) (*.f64 y-scale y-scale)))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 x-scale x-scale)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (pow.f64 x-scale #s(literal 4 binary64)))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 x-scale x-scale)) (.f64 a a)) (.f64 y-scale y-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (.f64 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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))))))))) y-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 y-scale 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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.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 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))))) y-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 y-scale 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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (.f64 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.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 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.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 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))))))) y-scale))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) y-scale))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (/.f64 (-.f64 (fma.f64 #s(literal -1 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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) y-scale))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (/.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 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 (.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 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) y-scale))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (/.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 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))) y-scale))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (/.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 y-scale y-scale) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.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 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (/.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 y-scale y-scale) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (/.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 y-scale y-scale)))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 y-scale y-scale)))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.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 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 y-scale y-scale)))
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 y-scale y-scale)))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.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 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))))) (*.f64 y-scale y-scale)))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (/.f64 (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.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 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (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 (.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)) (/.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 y-scale y-scale)))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)))) (/.f64 (.f64 (.f64 b b) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b b) (.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)))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b b) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b b) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 b b) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (.f64 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 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.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))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (-.f64 (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (-.f64 (.f64 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 y-scale y-scale)))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 y-scale y-scale))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 y-scale y-scale)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (*.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (*.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 y-scale y-scale)))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 y-scale y-scale)))))))
#s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (.f64 b (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (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 (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (.f64 b (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (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 (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (/.f64 (pow.f64 (.f64 b (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (-.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 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (.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 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (/.f64 (pow.f64 (.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 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))
#s(approx (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (.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 #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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.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))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))))))
#s(approx (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)))) (.f64 (.f64 b b) (sqrt.f64 (/.f64 (pow.f64 (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 (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 (.f64 b b) (sqrt.f64 (/.f64 (pow.f64 (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 (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 (.f64 b b) (sqrt.f64 (/.f64 (pow.f64 (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 (* (* b b) (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (.f64 b b) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 (.f64 b b) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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)))) (/ (/ (* (* (* 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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 y-scale y-scale)) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 x-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 x-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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)))))))))

eval1.2s (4.7%)

Memory: 64.5MiB live, 2 026.6MiB allocated; 409ms collecting garbage
Compiler: Compiled 159 146 to 17 863 computations (88.8% saved)

prune741.0ms (2.8%)

Memory

-40.9MiB live, 1 513.2MiB allocated; 274ms collecting garbage

Pruning

50 alts after pruning (50 fresh and 0 done)

	Pruned	Kept	Total
New	1 409	45	1 454
Fresh	18	5	23
Picked	5	0	5
Done	0	0	0
Total	1 432	50	1 482

Accuracy

75.6%

Counts

1 482 → 50

Alt Table

Click to see full alt table

Status	Accuracy	Program
	14.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)) (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)))
	10.0%	(.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 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 (/ (/ (* (* (* 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)))))) (PI.f64)))
	14.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 #s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (cos.f64 #s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (cos.f64 #s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) x-scale) y-scale))) (PI.f64)))
	15.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 #s(approx (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #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))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	10.8%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 #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)))) 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 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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 #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))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) #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(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(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.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 #s(approx (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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.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 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))
	17.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (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 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)))
	18.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.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)))
	18.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 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 #s(approx (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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)))
	17.9%	(.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 (+.f64 #s(approx (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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)))
	18.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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)))
	8.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 a a))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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.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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
	9.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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))
	6.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 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 b b))) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	4.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 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 y-scale y-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	1.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 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	9.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 #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	20.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 #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	9.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) y-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	3.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (.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) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) x-scale))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	7.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) #s(approx (/ ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.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 1/2 binary64) (/.f64 (.f64 x-scale #s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) y-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)))))))))) (PI.f64)))
▶	20.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)))))))))) (PI.f64)))
▶	29.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (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)))
	26.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) #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 #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)))
	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 -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (exp.f64 (.f64 (log.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (exp.f64 (.f64 (log.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 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)))
	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 -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 b b))) #s(literal 2 binary64))) #s(approx (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 b b))))) (.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)))
	28.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 (+.f64 (sqrt.f64 (exp.f64 (.f64 (log.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))
	28.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 (+.f64 (sqrt.f64 #s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))
	28.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 (+.f64 #s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (sqrt.f64 (pow.f64 b #s(literal 4 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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (fma.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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.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 #s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.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)))
	26.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 #s(approx ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 b b) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 b b))))) (.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)))
	22.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (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)))
▶	42.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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)))
	4.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 angle (PI.f64)))) (.f64 a a))))))) (PI.f64)))
	4.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (PI.f64)))) (*.f64 b b))))))) (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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))))))) (PI.f64)))
▶	9.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
	34.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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
	20.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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)))
	37.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)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))) (PI.f64)))

Compiler

Compiled 16 924 to 8 348 computations (50.7% saved)

series1.0s (3.9%)

Memory

42.3MiB live, 1 353.1MiB allocated; 325ms collecting garbage

Counts

108 → 724

Calls

Call 1

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

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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))) (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1/2 (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (+ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (+ (* (pow a 2) (- (+ (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* 90 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (+ (* 90 (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))))) (* 90 (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (+ (* 90 (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))) (* (pow a 2) (+ (* 90 (* (pow a 2) (- (* -1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))) (* -1 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))) (pow b 2)))))) (* 90 (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (- (+ (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2))))) (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow a 2) (- (* -1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))) (* -1 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2))))) (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 2) (+ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* x-scale (* y-scale (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (+ (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow a 2) (+ (* -1/2 (/ (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow a 2) (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow a 2) (- (+ (* -1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ 1 (pow y-scale 2))) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow a 2) (- (+ (* (pow a 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (* a a) (* y-scale y-scale)) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx a #s(hole binary64 a))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (sqrt (/ (pow b 4) (pow x-scale 4)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow b 4) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 2) (pow y-scale 4)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (* 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/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 2)))))) (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1/2 (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* (pow a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))) (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (+ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 3))) (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (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 (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 4))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow a 6))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow a 6) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1 (/ (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 6))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 90 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))))) (pow a 4))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 90 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))))) (pow a 4))) (+ (* 90 (/ (- (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))))) (* -1 (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))))))))) (pow a 6))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4)))))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))))) (+ (* -1 (/ (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))) (pow a 4))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* (pow a 2) (* angle (PI))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))))) (+ (* -1 (/ (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))))))) (pow a 6))) (+ (* -1 (/ (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))) (pow a 4))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* (pow a 2) (* angle (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* x-scale (* y-scale (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (+ (* -1/2 (/ (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (+ (* -1/2 (/ (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (pow a 2))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ 1 (pow y-scale 2))) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (/ 1 (pow y-scale 2))) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (sqrt (/ 1 (pow y-scale 4))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow a 4) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow y-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow a 4) (pow x-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (* (pow a 2) (pow x-scale 2))) (/ 1 (pow y-scale 2))))))
#s(approx (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow a 4))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))) (pow a 6))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow a 6) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1 (/ (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow a 6))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* -1/2 (/ (* (pow b 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (+ (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow a 4)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (sin (* 1/180 (* angle (PI))))) (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1/2 (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* 90 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (+ (* 90 (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))))) (* 90 (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (+ (* 90 (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))) (* (pow b 2) (+ (* 90 (* (pow b 2) (- (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))) (* -1 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))) (pow a 2)))))) (* 90 (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (- (+ (* (pow b 2) (- (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* (pow b 2) (- (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))) (* -1 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))))) (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))) (* -1/2 (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))) (* (pow b 2) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* x-scale (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* (pow b 2) (+ (* -1 (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* -1/2 (/ (* (pow b 2) (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* (pow b 2) (+ (* -1 (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow b 2) (+ (* -1/2 (/ (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* (pow b 2) (- (* -1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* (pow b 2) (- (* (pow b 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (sqrt (/ (pow a 4) (pow y-scale 4)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ 1 (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 2) (pow x-scale 4)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 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)))))))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) #s(hole binary64 (* -1 (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale))))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) #s(hole binary64 (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale)))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) #s(hole binary64 (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) #s(hole binary64 (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))
#s(approx (* b (cos (* 1/180 (* angle (PI))))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))))) (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1/2 (- (* -1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (- (+ (* -1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (+ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (* b (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))) (pow b 6))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow b 6) (* x-scale (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow b 6))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* 90 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))))) (pow b 4))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* 90 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))))) (pow b 4))) (+ (* 90 (/ (- (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))))) (* -1 (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))))))))) (pow b 6))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (pow b 4) (* (PI) (sqrt (/ 1 (pow x-scale 4)))))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))))) (+ (* -1 (/ (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))) (pow b 4))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (* (pow b 2) (PI))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (pow b 4) (* (PI) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* angle (* (pow b 6) (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))))) (+ (* -1 (/ (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))))))) (pow b 6))) (+ (* -1 (/ (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))) (pow b 4))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (* (pow b 2) (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* (pow b 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (pow b 2))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (pow b 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* x-scale (* y-scale (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (pow b 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* (pow b 2) (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))) (pow b 2))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))) (pow b 2)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))) (pow b 2))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -1 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (* (pow b 2) (pow y-scale 2))) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ 1 (pow x-scale 2)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ 1 (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ 1 (pow x-scale 2)))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (sqrt (/ 1 (pow x-scale 4))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow x-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow b 4) (pow y-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (/ 1 (pow x-scale 2))))))
#s(approx (* 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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 3)))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))) (pow b 6))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 4)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))))))) (* (pow b 6) (* x-scale (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 3))))) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (pow b 6))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 4))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow b 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* (pow b 4) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow b 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))))))) (* (pow b 6) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 3)))) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* (pow b 4) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow b 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))))) (* (pow b 6) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))))) (* (pow b 6) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (+ (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow b 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow b 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (sin (* 1/180 (* angle (PI)))) (* -1 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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))))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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))))))) (* 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/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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 (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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))))))) (* 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/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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))))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 360 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* x-scale (PI)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 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)))))))) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* x-scale (PI)))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/2 (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))) (* x-scale (PI)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* x-scale (PI)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 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))))))) (PI))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 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))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 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)))))))) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* 2 y-scale)))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* -1/16200 (* (pow angle 2) (* y-scale (pow (PI) 2)))) (* 2 y-scale))))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* 2 y-scale) (* (pow angle 2) (+ (* -1/16200 (* y-scale (pow (PI) 2))) (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* 2 y-scale) (* (pow angle 2) (+ (* -1/16200 (* y-scale (pow (PI) 2))) (* (pow angle 2) (+ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/2 (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))))))))))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 2))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ 2 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (+ (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/2 (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))))))))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 1))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/2 (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))))))))))))
#s(approx (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 (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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/180 (* angle (* x-scale (PI))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (PI))) (* (pow angle 2) (* x-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (PI))) (* (pow angle 2) (+ (* x-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* (pow angle 2) (* x-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (PI))) (* (pow angle 2) (+ (* x-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* (pow angle 2) (+ (* x-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* (pow angle 2) (* x-scale (+ (* -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)))) (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 (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (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))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))) (* (pow b 2) (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (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 b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))))))) angle)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))) (* (pow b 2) (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (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 b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI)))))))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))) angle)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow angle 2) (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow angle 2) (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow angle 2) (* x-scale (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))))))))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale)) (* -1 (/ (* (pow angle 2) (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4))))))) x-scale)))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale)) (* (pow angle 2) (+ (* -1 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) x-scale)) (* -1 (/ (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) x-scale)))))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale)) (* (pow angle 2) (+ (* -1 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) x-scale)) (* (pow angle 2) (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) x-scale)) (* -1 (/ (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))) x-scale)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) #s(hole binary64 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale)))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) #s(hole binary64 (+ (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale) (/ (* (pow angle 2) (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4))))))) x-scale))))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) x-scale) (/ (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) x-scale))) (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale))))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) x-scale) (/ (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))) x-scale))) (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) x-scale))) (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale))))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* (pow angle 2) (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4))))))))))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* (pow angle 2) (+ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* (pow angle 2) (+ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) (* (pow angle 2) (+ (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (pow b 2))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) (pow b 2)))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (pow b 2)))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (pow b 2)))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) #s(hole binary64 (sqrt (pow b 4))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) #s(hole binary64 (+ (sqrt (pow b 4)) (* -1/32400 (/ (* (pow angle 2) (* (pow b 4) (pow (PI) 2))) (sqrt (pow b 4)))))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) #s(hole binary64 (+ (sqrt (pow b 4)) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* 1/2 (/ (* (pow angle 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))))))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) #s(hole binary64 (+ (sqrt (pow b 4)) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))))))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) #s(hole binary64 (pow b 4)))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) #s(hole binary64 (+ (* -1/16200 (* (pow angle 2) (* (pow b 4) (pow (PI) 2)))) (pow b 4))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/16200 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4)))))))) (pow b 4))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/16200 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))))) (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))))))) (pow b 4))))
#s(approx (* 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 (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 b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/180 (* angle (* (pow b 2) (PI))))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow b 2) (PI))) (* (pow angle 2) (* (pow b 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow b 2) (PI))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))))) (* (pow b 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow b 2) (PI))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7))))))) (* (pow b 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -90 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/2 (/ (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 180 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/2 (/ (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* angle (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* angle (+ (* angle (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* y-scale (+ (* 1/2 (/ (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (+ (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (+ (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (+ (* angle (+ (* 1/2 (/ (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* 1/90 (/ (* angle (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* angle (+ (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* 1/2 (/ (* angle (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* angle (+ (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* angle (+ (* 1/2 (/ (* angle (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* 1/45 (* angle (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (* 1/90 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (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 (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (* b (sin (* 1/2 (PI))))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/180 (* angle (* b (* (PI) (cos (* 1/2 (PI))))))) (* b (sin (* 1/2 (PI)))))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (+ (* -1/64800 (* angle (* b (* (pow (PI) 2) (sin (* 1/2 (PI))))))) (* 1/180 (* b (* (PI) (cos (* 1/2 (PI)))))))) (* b (sin (* 1/2 (PI)))))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (+ (* 1/180 (* b (* (PI) (cos (* 1/2 (PI)))))) (* angle (+ (* -1/64800 (* b (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* -1/34992000 (* angle (* b (* (pow (PI) 3) (cos (* 1/2 (PI))))))))))) (* b (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 1/180 (* angle (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* x-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* 1/180 (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (* x-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/3149280000 (* angle (* x-scale (* (pow (PI) 4) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* x-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* 1/180 (* angle (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (+ (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/3149280000 (* angle (* (pow (PI) 4) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* 1/180 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/180 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/22674816000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 4)))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* 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))))))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale))))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) #s(hole binary64 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale)))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) #s(hole binary64 (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2)))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -45 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -45 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* -45 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* angle (* y-scale (* (PI) (* (pow (sqrt (pow b 4)) 3) (- (pow b 2) (pow a 2))))))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) #s(hole binary64 (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* angle (* y-scale (* (PI) (* (pow (sqrt (pow b 4)) 3) (- (pow b 2) (pow a 2)))))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (sqrt (pow b 4)))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* y-scale (pow (sqrt (pow b 4)) 3))))))))) x-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (sqrt (pow b 4)))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* y-scale (pow (sqrt (pow b 4)) 3))))))))) (pow x-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2)))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (/ (pow a 2) (pow y-scale 2))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))) (/ (pow a 2) (pow y-scale 2))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* -1 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (* (pow y-scale 2) (sqrt (pow b 4))))) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))))) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))))) (pow b 2))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (sqrt (pow b 4)) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* -1 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (* (pow y-scale 2) (sqrt (pow b 4)))))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4))))))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4))))))))) (pow x-scale 2))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (pow y-scale 2))) (pow b 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (/ (* (pow a 4) (pow x-scale 2)) (pow y-scale 4)))) (pow b 4)) (pow x-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (pow b 2)) (pow x-scale 2))))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -45 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow a 4) (pow y-scale 4)) (/ (pow b 4) (pow x-scale 4))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* x-scale (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* x-scale (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* x-scale (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (+ (* 1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 45 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (+ (* 1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* -1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* y-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 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (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))) (sqrt (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 b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (- (pow b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 2) (pow a 2)))))))))))) y-scale)))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -90 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* -45 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2)))))))))) y-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -90 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -45 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))) (* -45 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* angle (* x-scale (* (PI) (* (pow (sqrt (pow a 4)) 3) (- (pow b 2) (pow a 2))))))))))))) y-scale)))
#s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(hole binary64 0))
#s(approx (/ 1 (* y-scale y-scale)) #s(hole binary64 (/ 1 (pow y-scale 2))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (pow y-scale -4) #s(hole binary64 (/ 1 (pow y-scale 4))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))))) (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* angle (* x-scale (* (PI) (* (pow (sqrt (pow a 4)) 3) (- (pow b 2) (pow a 2)))))))))))) (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* x-scale (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* x-scale (- (pow a 2) (sqrt (pow a 4))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (sqrt (pow a 4))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* x-scale (pow (sqrt (pow a 4)) 3))))))))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (pow a 2) (sqrt (pow a 4))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (+ (* -1 (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))))) (pow a 2)) (sqrt (pow a 4))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (+ (* -1 (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* -1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))))) (pow a 2)) (sqrt (pow a 4))) y-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (pow a 2) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (sqrt (pow a 4)) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (/ (pow b 2) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))) (/ (pow b 2) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* -1 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (* (pow x-scale 2) (sqrt (pow a 4)))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4))))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4))))))))) (pow y-scale 2))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (pow x-scale 2))) (pow a 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (/ (* (pow b 4) (pow y-scale 2)) (pow x-scale 4)))) (pow a 4)) (pow y-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2)) (pow a 2)) (pow y-scale 2))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) y-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))) y-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))))))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))) 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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/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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -45 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* x-scale (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (/ (pow a 2) (pow y-scale 2))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (+ (* -1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow a 2) (pow y-scale 2)))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* -1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow a 2) (pow y-scale 2))))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 45 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))) (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* x-scale (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (* 1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (+ (* 1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (* 1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))) (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* -1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))

Calls

15 calls:

Time	Variable		Point	Expression
122.0ms	x-scale	@	-inf	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) 4 (pow (cos (* 1/180 (* angle (PI)))) 2) 2 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI))) (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4)))) (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))) (/ 1 (* y-scale y-scale)) 1 (* y-scale y-scale) (sqrt (pow y-scale -4)) (pow y-scale -4) -4 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/ (* a a) (* y-scale y-scale)) (* a a) a (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) b (* 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)) (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (* b (cos (* 1/180 (* angle (PI))))) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* (* b b) (* (cos (* 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)) (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2) (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)))
102.0ms	y-scale	@	0	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) 4 (pow (cos (* 1/180 (* angle (PI)))) 2) 2 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI))) (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4)))) (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))) (/ 1 (* y-scale y-scale)) 1 (* y-scale y-scale) (sqrt (pow y-scale -4)) (pow y-scale -4) -4 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/ (* a a) (* y-scale y-scale)) (* a a) a (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) b (* 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)) (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (* b (cos (* 1/180 (* angle (PI))))) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* (* b b) (* (cos (* 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)) (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2) (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)))
102.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) 4 (pow (cos (* 1/180 (* angle (PI)))) 2) 2 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI))) (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4)))) (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))) (/ 1 (* y-scale y-scale)) 1 (* y-scale y-scale) (sqrt (pow y-scale -4)) (pow y-scale -4) -4 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/ (* a a) (* y-scale y-scale)) (* a a) a (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) b (* 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)) (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (* b (cos (* 1/180 (* angle (PI))))) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* (* b b) (* (cos (* 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)) (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2) (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)))
72.0ms	angle	@	-inf	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) 4 (pow (cos (* 1/180 (* angle (PI)))) 2) 2 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI))) (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4)))) (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))) (/ 1 (* y-scale y-scale)) 1 (* y-scale y-scale) (sqrt (pow y-scale -4)) (pow y-scale -4) -4 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/ (* a a) (* y-scale y-scale)) (* a a) a (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) b (* 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)) (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (* b (cos (* 1/180 (* angle (PI))))) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* (* b b) (* (cos (* 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)) (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2) (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)))
67.0ms	a	@	inf	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 4) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) 4 (pow (cos (* 1/180 (* angle (PI)))) 2) 2 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI))) (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4)))) (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))) (/ 1 (* y-scale y-scale)) 1 (* y-scale y-scale) (sqrt (pow y-scale -4)) (pow y-scale -4) -4 (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/ (* a a) (* y-scale y-scale)) (* a a) a (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/ (* b b) (* x-scale x-scale)) (* b b) b (* 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)) (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (* b (cos (* 1/180 (* angle (PI))))) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* (* b b) (* (cos (* 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)) (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2) (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)))

rewrite702.0ms (2.7%)

Memory

48.7MiB live, 782.1MiB allocated; 258ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	5494	171844
0	5656	161635
0	8412	158250

Stop Event

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

Counts

832 → 914

Calls

Call 1

Inputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(literal -1/2 binary64)
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
y-scale
(+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))
(pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
#s(literal 4 binary64)
(pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
#s(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))))))
x-scale
(.f64 (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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64)))))
(.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))
#s(literal -90 binary64)
(/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64)))
(.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))
(.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))
(-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))
#s(literal 1 binary64)
(*.f64 y-scale y-scale)
(sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))
(pow.f64 y-scale #s(literal -4 binary64))
#s(literal -4 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))
(.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b))))))
#s(literal 90 binary64)
(/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (*.f64 b b)))))
(.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(*.f64 a a)
a
(+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(*.f64 b b)
b
(*.f64 x-scale x-scale)
(.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (*.f64 b b))))
(.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))
#s(approx (- (* b b) (* a a)) (*.f64 b b))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)))))))))) (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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)))))))))) (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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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/2 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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(literal 1/2 binary64)
(/.f64 #s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) x-scale)))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) x-scale))
#s(literal -1 binary64)
(/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))) x-scale)
(.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))))
(+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))
(pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))
(.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 (.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 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (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))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (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)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (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))))))))
(.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (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)))))))
(/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (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))))))
(.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (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 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))))
(sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (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)))))
(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 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(.f64 x-scale (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))
(.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))
(-.f64 (.f64 b b) (.f64 a a))
#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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))) (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1/2 (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (+ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (+ (* (pow a 2) (- (+ (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* 90 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (+ (* 90 (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))))) (* 90 (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (+ (* 90 (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))) (* (pow a 2) (+ (* 90 (* (pow a 2) (- (* -1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))) (* -1 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))) (pow b 2)))))) (* 90 (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (- (+ (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2))))) (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* (pow a 2) (- (* -1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))) (* -1 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2))))) (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow a 2) (+ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* x-scale (* y-scale (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (+ (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow a 2) (+ (* -1/2 (/ (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow a 2) (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow a 2) (- (+ (* -1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ 1 (pow y-scale 2))) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow a 2) (- (+ (* (pow a 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ 1 (pow y-scale 2))) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (* a a) (* y-scale y-scale)) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx a #s(hole binary64 a))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (sqrt (/ (pow b 4) (pow x-scale 4)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (* (pow a 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (* (pow a 2) (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow b 4) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 2) (pow y-scale 4)))) (/ (pow b 4) (pow x-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (* 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/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 2)))))) (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1/2 (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* (pow a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))) (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (+ (* y-scale (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 3))) (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (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 (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 4))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow a 6))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow a 6) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1 (/ (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 6))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 90 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))))) (pow a 4))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 90 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))))) (pow a 4))) (+ (* 90 (/ (- (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))))) (* -1 (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))))))))) (pow a 6))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4)))))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))))) (+ (* -1 (/ (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))) (pow a 4))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* (pow a 2) (* angle (PI))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))))) (+ (* -1 (/ (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))))))) (pow a 6))) (+ (* -1 (/ (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))) (pow a 4))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* (pow a 2) (* angle (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* x-scale (* y-scale (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (+ (* -1/2 (/ (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))) (pow a 2))) (+ (* -1/2 (/ (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))) (pow a 2))) (/ 1 (pow y-scale 2))) (sqrt (/ 1 (pow y-scale 4)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ 1 (pow y-scale 2))) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (/ 1 (pow y-scale 2))) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (sqrt (/ 1 (pow y-scale 4))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))) (/ (pow b 2) (* (pow a 2) (pow x-scale 2))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (/ 1 (pow y-scale 4))) (+ (* -1 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4)))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* (pow a 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow y-scale 4))) 3)))))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))) (* (pow a 4) (sqrt (/ 1 (pow y-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (pow a 4) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow y-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (pow b 2) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow a 4) (pow x-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (* (pow a 2) (pow x-scale 2))) (/ 1 (pow y-scale 2))))))
#s(approx (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow a 4))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))) (pow a 6))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow a 6) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1 (/ (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow a 6))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* -1/2 (/ (* (pow b 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* y-scale (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (+ (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow a 4)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (sin (* 1/180 (* angle (PI))))) (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1/2 (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* 90 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (+ (* 90 (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))))) (* 90 (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (+ (* 90 (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))) (* (pow b 2) (+ (* 90 (* (pow b 2) (- (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))) (* -1 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))) (pow a 2)))))) (* 90 (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (- (+ (* (pow b 2) (- (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* (pow b 2) (- (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))) (* -1 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2))))) (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))))) (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))) (* -1/2 (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))) (* (pow b 2) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* x-scale (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* (pow b 2) (+ (* -1 (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* -1/2 (/ (* (pow b 2) (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* (pow b 2) (+ (* -1 (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow b 2) (+ (* -1/2 (/ (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* (pow b 2) (- (* -1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* (pow b 2) (- (* (pow b 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (sqrt (/ (pow a 4) (pow y-scale 4)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))) (/ 1 (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* (pow b 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow b 2) (pow x-scale 4)))) (/ (pow a 4) (pow y-scale 4)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 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)))))))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) #s(hole binary64 (* -1 (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale))))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) #s(hole binary64 (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale)))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) #s(hole binary64 (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) #s(hole binary64 (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))
#s(approx (* b (cos (* 1/180 (* angle (PI))))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))))) (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1/2 (- (* -1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (- (+ (* -1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (+ (* y-scale (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (* y-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (* b (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))) (pow b 6))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow b 6) (* x-scale (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow b 6))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* 90 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))))) (pow b 4))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* 90 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))))) (pow b 4))) (+ (* 90 (/ (- (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))))) (* -1 (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))))))))) (pow b 6))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (pow b 4) (* (PI) (sqrt (/ 1 (pow x-scale 4)))))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))))) (+ (* -1 (/ (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))) (pow b 4))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (* (pow b 2) (PI))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (pow b 4) (* (PI) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* angle (* (pow b 6) (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI))))))) (+ (* -1 (/ (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))))))) (pow b 6))) (+ (* -1 (/ (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))) (pow b 4))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (* (pow b 2) (PI)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* (pow b 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (pow b 2))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (pow b 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* x-scale (* y-scale (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (pow b 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* (pow b 2) (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))) (pow b 2))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))) (pow b 2)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* y-scale (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))) (pow b 2))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -1 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (/ (pow a 2) (* (pow b 2) (pow y-scale 2))) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ 1 (pow x-scale 2)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (/ 1 (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ 1 (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (+ (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))) (/ 1 (pow x-scale 2)))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (sqrt (/ 1 (pow x-scale 4))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (/ 1 (pow x-scale 4))) (+ (* -1 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))) (+ (* 1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* (pow b 6) (* (pow x-scale 2) (* (pow y-scale 2) (pow (sqrt (/ 1 (pow x-scale 4))) 3)))))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))) (* (pow b 4) (sqrt (/ 1 (pow x-scale 4))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (/ 1 (pow x-scale 4))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (pow a 2) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow b 4) (pow y-scale 4))))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (/ 1 (pow x-scale 2))))))
#s(approx (* 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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 3)))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))) (pow b 6))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 4)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))))))) (* (pow b 6) (* x-scale (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 3))))) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (pow b 6))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow b 4))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow b 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* (pow b 4) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow b 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))))))) (* (pow b 6) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 3)))) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))) (* (pow b 4) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow b 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))))) (* (pow b 6) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2)))))) (* (pow b 6) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (+ (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow b 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow b 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (sin (* 1/180 (* angle (PI)))) (* -1 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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))))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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))))))) (* 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/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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 (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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))))))) (* 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/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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))))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 360 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* x-scale (PI)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 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)))))))) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* x-scale (PI)))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/2 (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))) (* x-scale (PI)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* x-scale (PI)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 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))))))) (PI))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 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))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 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)))))))) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* 2 y-scale)))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* -1/16200 (* (pow angle 2) (* y-scale (pow (PI) 2)))) (* 2 y-scale))))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* 2 y-scale) (* (pow angle 2) (+ (* -1/16200 (* y-scale (pow (PI) 2))) (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* 2 y-scale) (* (pow angle 2) (+ (* -1/16200 (* y-scale (pow (PI) 2))) (* (pow angle 2) (+ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/2 (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))))))))))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 2))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ 2 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (+ (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/2 (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))))))))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 1))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/2 (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))))))))))))
#s(approx (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 (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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/180 (* angle (* x-scale (PI))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (PI))) (* (pow angle 2) (* x-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (PI))) (* (pow angle 2) (+ (* x-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* (pow angle 2) (* x-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (PI))) (* (pow angle 2) (+ (* x-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* (pow angle 2) (+ (* x-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* (pow angle 2) (* x-scale (+ (* -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)))) (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 (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (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))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))) (* (pow b 2) (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (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 b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))))))) angle)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))))) (* (pow b 2) (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow b 2) (PI)))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (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 b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI)))))))) (+ (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow b 2) (PI)))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2)))))) (PI))))))) (* -32400 (/ (* x-scale (* y-scale (* (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))) (* (pow b 2) (pow (PI) 2))))))) angle)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow angle 2) (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow angle 2) (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -1 (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 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/2 (/ (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* (pow angle 2) (* x-scale (* y-scale (- (/ (* (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 b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2)))))) (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) (- (+ (* 2 (/ (* (pow b 2) (- (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)) (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (- (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (pow x-scale 2)))) 2) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (sqrt (/ (pow b 4) (pow x-scale 4))))) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))))))))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale)) (* -1 (/ (* (pow angle 2) (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4))))))) x-scale)))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale)) (* (pow angle 2) (+ (* -1 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) x-scale)) (* -1 (/ (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) x-scale)))))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale)) (* (pow angle 2) (+ (* -1 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) x-scale)) (* (pow angle 2) (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) x-scale)) (* -1 (/ (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))) x-scale)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) #s(hole binary64 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale)))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) #s(hole binary64 (+ (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale) (/ (* (pow angle 2) (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4))))))) x-scale))))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) x-scale) (/ (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) x-scale))) (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale))))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) x-scale) (/ (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))) x-scale))) (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) x-scale))) (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) x-scale))))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* (pow angle 2) (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4))))))))))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* (pow angle 2) (+ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* (pow angle 2) (+ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) (* (pow angle 2) (+ (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow angle 2) (* y-scale (+ (* 1/2 (/ (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (pow b 2))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))))) (pow b 2)))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (pow b 2)))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (pow b 2)))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) #s(hole binary64 (sqrt (pow b 4))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) #s(hole binary64 (+ (sqrt (pow b 4)) (* -1/32400 (/ (* (pow angle 2) (* (pow b 4) (pow (PI) 2))) (sqrt (pow b 4)))))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) #s(hole binary64 (+ (sqrt (pow b 4)) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* 1/2 (/ (* (pow angle 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))))))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) #s(hole binary64 (+ (sqrt (pow b 4)) (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 4) (pow (PI) 2)) (sqrt (pow b 4)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6))))) (* -1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))))) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (* 1/2 (/ (- (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))) (* 1/1049760000 (/ (* (pow b 8) (pow (PI) 4)) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))))))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) #s(hole binary64 (pow b 4)))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) #s(hole binary64 (+ (* -1/16200 (* (pow angle 2) (* (pow b 4) (pow (PI) 2)))) (pow b 4))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/16200 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4)))))))) (pow b 4))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/16200 (* (pow b 4) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 4) (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))))) (* (pow b 4) (+ (* 1/6298560000 (pow (PI) 4)) (+ (* 1/2099520000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))))))) (pow b 4))))
#s(approx (* 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 (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 b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/180 (* angle (* (pow b 2) (PI))))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow b 2) (PI))) (* (pow angle 2) (* (pow b 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow b 2) (PI))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))))) (* (pow b 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow b 2) (PI))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7))))))) (* (pow b 2) (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))) (* (pow b 2) (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -90 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/2 (/ (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 180 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/2 (/ (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* angle (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* angle (+ (* angle (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* y-scale (+ (* 1/2 (/ (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* y-scale (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (+ (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (+ (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (+ (* angle (+ (* 1/2 (/ (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* 1/90 (/ (* angle (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* angle (+ (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* 1/2 (/ (* angle (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* angle (+ (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* angle (+ (* 1/2 (/ (* angle (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/90 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/8100 (/ (* (pow b 8) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* 1/45 (* angle (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (* 1/90 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (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 (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (* b (sin (* 1/2 (PI))))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/180 (* angle (* b (* (PI) (cos (* 1/2 (PI))))))) (* b (sin (* 1/2 (PI)))))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (+ (* -1/64800 (* angle (* b (* (pow (PI) 2) (sin (* 1/2 (PI))))))) (* 1/180 (* b (* (PI) (cos (* 1/2 (PI)))))))) (* b (sin (* 1/2 (PI)))))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (+ (* 1/180 (* b (* (PI) (cos (* 1/2 (PI)))))) (* angle (+ (* -1/64800 (* b (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* -1/34992000 (* angle (* b (* (pow (PI) 3) (cos (* 1/2 (PI))))))))))) (* b (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 1/180 (* angle (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* x-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* 1/180 (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (* x-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/3149280000 (* angle (* x-scale (* (pow (PI) 4) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* x-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* 1/180 (* angle (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (+ (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/3149280000 (* angle (* (pow (PI) 4) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* 1/180 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/180 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/22674816000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 4)))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* 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))))))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale))))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) #s(hole binary64 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale)))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) #s(hole binary64 (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) #s(hole binary64 (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) #s(hole binary64 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) #s(hole binary64 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) #s(hole binary64 (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2)))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -45 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -45 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* -45 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* angle (* y-scale (* (PI) (* (pow (sqrt (pow b 4)) 3) (- (pow b 2) (pow a 2))))))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) #s(hole binary64 (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* angle (* y-scale (* (PI) (* (pow (sqrt (pow b 4)) 3) (- (pow b 2) (pow a 2)))))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (sqrt (pow b 4)))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* y-scale (pow (sqrt (pow b 4)) 3))))))))) x-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (sqrt (pow b 4)))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (pow b 4)) (pow b 2)))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* y-scale (pow (sqrt (pow b 4)) 3))))))))) (pow x-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2)))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))) (/ (pow a 2) (pow y-scale 2))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))) (/ (pow a 2) (pow y-scale 2))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (+ (sqrt (pow b 4)) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* -1 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (* (pow y-scale 2) (sqrt (pow b 4))))) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4)))))) (pow b 2))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4)))))))) (pow b 2))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (sqrt (pow b 4)) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* -1 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (* (pow y-scale 2) (sqrt (pow b 4)))))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (sqrt (pow b 4))))))) (pow x-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (* (pow x-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* (pow y-scale 2) (pow (sqrt (pow b 4)) 3)))) (* 1/2 (/ (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))) (sqrt (pow b 4))))))))) (pow x-scale 2))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow x-scale 2))) (pow y-scale 2))) (pow b 4)) (pow x-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (/ (* (pow a 4) (pow x-scale 2)) (pow y-scale 4)))) (pow b 4)) (pow x-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (pow b 2)) (pow x-scale 2))))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -45 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2)) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) (sqrt (/ (pow a 4) (pow y-scale 4))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow a 4) (pow y-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (* 1/2 (/ (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow a 4) (pow y-scale 4)) (/ (pow b 4) (pow x-scale 4))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* x-scale (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* x-scale (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* x-scale (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (* 1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (+ (* 1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 45 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (* y-scale (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))) (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (pow x-scale 2)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/2 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (+ (* 1/4 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (/ (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow b 2) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3))))))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow b 2) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (+ (* -1/4 (/ (* y-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2)))))) (* (pow x-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 3)))) (+ (* 1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))) 2))))) (* (pow x-scale 4) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))) (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (sqrt (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* y-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 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (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))) (sqrt (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 b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (- (pow b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 2) (pow a 2)))))))))))) y-scale)))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -90 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* -45 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2)))))))))) y-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -90 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -45 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))) (* -45 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* angle (* x-scale (* (PI) (* (pow (sqrt (pow a 4)) 3) (- (pow b 2) (pow a 2))))))))))))) y-scale)))
#s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(hole binary64 0))
#s(approx (/ 1 (* y-scale y-scale)) #s(hole binary64 (/ 1 (pow y-scale 2))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (pow y-scale -4) #s(hole binary64 (/ 1 (pow y-scale 4))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))))) (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* angle (* x-scale (* (PI) (* (pow (sqrt (pow a 4)) 3) (- (pow b 2) (pow a 2)))))))))))) (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* x-scale (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))))) (* x-scale (- (pow a 2) (sqrt (pow a 4))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (sqrt (pow a 4))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* x-scale (pow (sqrt (pow a 4)) 3))))))))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (pow a 2) (sqrt (pow a 4))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (+ (* -1 (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))))) (pow a 2)) (sqrt (pow a 4))) y-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (+ (* -1 (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* -1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))))) (pow a 2)) (sqrt (pow a 4))) y-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (pow a 2) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (+ (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow a 2)) (sqrt (pow a 4))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (sqrt (pow a 4)) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4)))) (/ (pow b 2) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4)))))) (/ (pow b 2) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* -1 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (* (pow x-scale 2) (sqrt (pow a 4)))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (sqrt (pow a 4))))))) (pow y-scale 2))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (/ (+ (sqrt (pow a 4)) (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* (pow x-scale 2) (pow (sqrt (pow a 4)) 3)))) (* 1/2 (/ (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))) (sqrt (pow a 4))))))))) (pow y-scale 2))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow y-scale 2))) (pow x-scale 2))) (pow a 4)) (pow y-scale 4))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (/ (* (pow b 4) (pow y-scale 2)) (pow x-scale 4)))) (pow a 4)) (pow y-scale 4))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2)) (pow a 2)) (pow y-scale 2))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) y-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))))) y-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))))))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 2) (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))) (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))) 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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/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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -45 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* x-scale (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (/ (pow a 2) (pow y-scale 2))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (+ (* -1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow a 2) (pow y-scale 2)))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -1 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* -1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow a 2) (pow y-scale 2))))) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) #s(hole binary64 (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (* 1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* -1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 45 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))) (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* x-scale (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (+ (* -1 (/ (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))) (+ (* 1/2 (/ (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))) (* (pow y-scale 4) (sqrt (/ (pow b 4) (pow x-scale 4)))))) (/ (pow b 2) (pow x-scale 2))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (* 1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (+ (* 1/4 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (* 1/2 (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (* (pow b 2) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow b 2) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3))))))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow b 2) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))))) (/ (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))) (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))))) (pow y-scale 2))) (+ (* -1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2)))))) (* (pow y-scale 6) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 3)))) (+ (* 1/2 (/ (* x-scale (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (pow (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) 2))))) (* (pow y-scale 4) (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))))) (* x-scale (+ (sqrt (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))

Outputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(literal -1/2 binary64)
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(/.f64 (neg.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (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)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
y-scale
(+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))
(fabs.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))
(pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))
(exp.f64 (.f64 (log.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))
(fma.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
(cos.f64 (fabs.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
#s(literal 4 binary64)
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(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)))
#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))))))
x-scale
(.f64 (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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64)))))
(.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))
#s(literal -90 binary64)
(/.f64 (neg.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (neg.f64 (.f64 angle (PI.f64))))
(/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64)))
(.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))
(.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))
(-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))
(pow.f64 (*.f64 y-scale y-scale) #s(literal -1 binary64))
(pow.f64 y-scale #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))
#s(literal 1 binary64)
(*.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)))
(pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 binary64))))
(sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))
(fabs.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))
(pow.f64 (pow.f64 y-scale #s(literal 4 binary64)) #s(literal -1 binary64))
(pow.f64 y-scale #s(literal -4 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 y-scale #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))
(exp.f64 (*.f64 (log.f64 y-scale) #s(literal -4 binary64)))
#s(literal -4 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b))))))))) (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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))
(.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b))))))
#s(literal 90 binary64)
(/.f64 (neg.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (neg.f64 (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (*.f64 b b))))))
(/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (*.f64 b b)))))
(.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-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 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 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))
(pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))
(fabs.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))))
(.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
(pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (-.f64 (/.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 b b) (.f64 y-scale y-scale)) (.f64 (.f64 x-scale x-scale) (.f64 a a))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))
(/.f64 (neg.f64 (.f64 b b)) (neg.f64 (.f64 x-scale x-scale)))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(*.f64 (fabs.f64 b) (fabs.f64 b))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 b b)
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
b
(*.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 b b))))
(.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))
#s(approx (- (* b b) (* a a)) (*.f64 b b))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)))))))))) (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 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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))))))))))) (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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)))))))))) (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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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/2 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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(literal 1/2 binary64)
(/.f64 (neg.f64 #s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) x-scale)))) (neg.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 #s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) x-scale)))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) x-scale))
#s(literal -1 binary64)
(/.f64 (neg.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (neg.f64 x-scale))
(/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))) x-scale)
(.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))
(pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))
(fabs.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))
(pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))
(exp.f64 (.f64 (log.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 4 binary64)))
(.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(.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 (.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 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))))
(+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
(pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(fabs.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))
(.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(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))))
(pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(fma.f64 (.f64 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))))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(fma.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 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 (.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 (.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)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
(cos.f64 (fabs.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(.f64 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)))
(-.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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.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 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b))))) (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.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 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))) (.f64 b b))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))) (.f64 b b)))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal 90 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 b b))))) (.f64 #s(literal 90 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 b b)))) (.f64 b b))))) (.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (*.f64 b b)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 (.f64 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 b b)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 (.f64 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 b b)))) (.f64 b b)))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 b b)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (*.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (*.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (fma.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 x-scale (*.f64 y-scale (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (*.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (fma.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 a a) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))
#s(approx (/ (* a a) (* y-scale y-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))
#s(approx (* a a) (*.f64 a a))
#s(approx a a)
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 a a) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
#s(approx (* 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/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 b b))))) (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 b b)))) (.f64 b b))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 b b)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 b b)))) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))))))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 b b)))) (.f64 b b)))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 b b)))) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (fma.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (fma.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (fma.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (fma.f64 (.f64 a a) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))))
#s(approx (pow (* a (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 (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 (.f64 b b) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 x-scale (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(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 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 x-scale (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (PI.f64))) (*.f64 a a)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (PI.f64))) (.f64 a a))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 6 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (PI.f64))) (*.f64 a a)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64)))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (PI.f64)))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (PI.f64)))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 a a)) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 x-scale (.f64 y-scale (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 a a) (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (/.f64 (.f64 b b) (.f64 (.f64 a a) (*.f64 x-scale x-scale))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (/.f64 (.f64 b b) (.f64 (.f64 a a) (*.f64 x-scale x-scale)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 x-scale x-scale))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (/.f64 (.f64 b b) (.f64 (.f64 a a) (*.f64 x-scale x-scale)))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 y-scale #s(literal -4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 a x-scale) #s(literal 4 binary64)))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))
#s(approx (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 a a)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 x-scale (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (pow.f64 a #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 x-scale (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (.f64 (.f64 a a) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 a a)))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 a a))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (+.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 a a)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (.f64 a 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 (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (.f64 a 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 (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (.f64 a 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 (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 a a)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 a a)) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (.f64 a a)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 a a)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (.f64 (.f64 b b) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 a a)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (/.f64 (.f64 (.f64 b b) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (*.f64 a a)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 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)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 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)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 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)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 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)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.f64 (.f64 #s(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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.f64 (.f64 #s(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 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 #s(literal 90 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a))))) (.f64 #s(literal 90 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a)))) (.f64 a a))))) (.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (.f64 b b) (-.f64 (fma.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a)))) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (.f64 b b) (-.f64 (fma.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a)))) (.f64 a a)))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a)))) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (fma.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 x-scale (.f64 y-scale (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 (.f64 b b) (-.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 b b) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))
#s(approx b b)
#s(approx (- (* b b) (* a a)) (-.f64 (.f64 b b) (.f64 a a)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 (.f64 b b) (.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 (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) x-scale)))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) x-scale))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (.f64 (.f64 b b) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 a a))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 a a)))) (.f64 a a))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 a a)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 a a)))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 a a)))) (.f64 a a)))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 a a)))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (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 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (fma.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (+.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 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (+.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) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (+.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) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (.f64 (.f64 b b) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 (.f64 b b) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 (.f64 b b) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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 a a) (.f64 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 x-scale (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (+.f64 (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.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)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 x-scale (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (+.f64 (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.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))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 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)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (*.f64 angle (PI.f64)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64))) (.f64 b b)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64)))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64))) (.f64 b b))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64)))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 6 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64))) (.f64 b b)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (*.f64 angle (PI.f64)))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (*.f64 b b) (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64)))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64)))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (*.f64 b b) (PI.f64))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 b b)))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (*.f64 b b))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 x-scale (.f64 y-scale (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 b b)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))))) (.f64 b b)))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))))) (.f64 b b))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))))) (.f64 b b)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 b b) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 x-scale #s(literal -4 binary64)))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 b y-scale) #s(literal 4 binary64)))))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))
#s(approx (* 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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 b b)))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 b b))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 x-scale (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 b b)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (+.f64 (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 x-scale (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (+.f64 (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (pow.f64 b #s(literal 6 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (.f64 (.f64 b b) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 b b)))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 b b))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (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 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (.f64 b b)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 b b)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 b b)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 b b)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (.f64 (.f64 b b) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 b b) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 b b)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (.f64 b b)) (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 b b)) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 b b)) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 (.f64 b b) (+.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 b b))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (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 (.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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #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 -1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (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 (.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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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 (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (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 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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/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 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 (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (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 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))) (.f64 x-scale (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 y-scale (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 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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/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)))))))) (PI.f64)) (fma.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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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/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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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/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 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 (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (*.f64 #s(literal 2 binary64) y-scale))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 y-scale (.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 2 binary64) y-scale)))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (fma.f64 #s(literal 2 binary64) y-scale (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 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)) (fma.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (fma.f64 #s(literal 2 binary64) y-scale (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 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)) (fma.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 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)) (fma.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/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 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 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)) (fma.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+.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/2 binary64) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/64800 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 1/25194240000 binary64) (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* 1/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 (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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (*.f64 x-scale (PI.f64)))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (PI.f64)) (.f64 (.f64 angle angle) (.f64 x-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)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 x-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 (.f64 angle angle) (.f64 x-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))))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 x-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 (.f64 angle angle) (fma.f64 x-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 (.f64 angle angle) (.f64 x-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)))))))))))))))
#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 (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (*.f64 (PI.f64) (PI.f64))))))))) angle))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (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 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64)))))))))) angle))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 (.f64 b b) (.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))))))) angle))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (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 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (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 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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) (PI.f64))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 (.f64 b b) (.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 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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) (PI.f64)))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))))) (fma.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.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 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))) (.f64 #s(literal -32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (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 b b) (*.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (.f64 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 y-scale y-scale)))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale x-scale)))))))))))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 b b))) x-scale)))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) x-scale) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) x-scale))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) x-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) x-scale) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #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)))))))) x-scale))))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) x-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) x-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #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))))))) x-scale) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 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))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) x-scale))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) (/.f64 (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) x-scale))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) (fma.f64 (.f64 angle angle) (/.f64 (fma.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #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))))))))) x-scale) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 b b))) x-scale)))
#s(approx (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) (fma.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (/.f64 (fma.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #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 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 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 y-scale (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) x-scale)) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 b b))) x-scale)))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 (.f64 angle angle) (fma.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #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))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (fma.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 (.f64 angle angle) (fma.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 (.f64 angle angle) (fma.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #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 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 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 (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 b b)))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (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 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 b b))))
#s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (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 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #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 (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (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 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 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 (* b (cos (* 1/180 (* angle (PI))))) 4)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (.f64 #s(literal 1/1049760000 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (pow.f64 b #s(literal 4 binary64)))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64)))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (+.f64 b (.f64 #s(literal -1/64800 binary64) (.f64 (.f64 angle angle) (.f64 b (*.f64 (PI.f64) (PI.f64)))))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (+.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 (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (+.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 (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 b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))
#s(approx (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (.f64 b b) (PI.f64)) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (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 (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (.f64 b b) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (.f64 (.f64 b b) (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 b b) (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 (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (.f64 b b) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (.f64 (.f64 b b) (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 (.f64 b b) (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 b b) (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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal -1/2 binary64) (.f64 angle (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (*.f64 a a))))))))) angle))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 angle (fma.f64 #s(literal -1/2 binary64) (.f64 angle (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))))))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (*.f64 a a)))))))))) angle))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 angle (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 angle (fma.f64 #s(literal -1/2 binary64) (.f64 angle (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/45 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (.f64 y-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64)))))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a))) #s(literal 2 binary64)))))))))))))) angle))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 angle (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) angle))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 angle (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64)))))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (*.f64 a a)))))))) angle))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 angle (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/45 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (.f64 y-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64)))))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64)))))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) angle))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (fma.f64 angle (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (fma.f64 angle (fma.f64 angle (.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (fma.f64 angle (fma.f64 angle (fma.f64 angle (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/45 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))) (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/45 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 angle (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 angle (-.f64 (fma.f64 #s(literal 1/45 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 8 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (fma.f64 #s(literal 1/45 binary64) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (.f64 angle (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))))) (pow.f64 (.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (.f64 angle (fma.f64 #s(literal 1/8100 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 angle (fma.f64 #s(literal 1/45 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))) (pow.f64 (.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) (fma.f64 #s(literal 1/90 binary64) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 (.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (fma.f64 angle (.f64 (.f64 b b) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 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 (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 angle (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 angle (fma.f64 angle (.f64 (.f64 b b) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 (.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 b (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 angle (fma.f64 #s(literal -1/64800 binary64) (.f64 angle (.f64 b (.f64 (.f64 (PI.f64) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/180 binary64) (.f64 b (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 b (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 angle (fma.f64 #s(literal -1/64800 binary64) (.f64 b (.f64 (.f64 (PI.f64) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/34992000 binary64) (.f64 angle (.f64 b (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 angle (fma.f64 #s(literal -1/64800 binary64) (.f64 angle (.f64 (.f64 (PI.f64) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 angle (fma.f64 #s(literal -1/64800 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/34992000 binary64) (.f64 angle (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 angle (.f64 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/180 binary64) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 angle (.f64 x-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))))))))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (.f64 angle (.f64 x-scale (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a))))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 angle (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 angle (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 angle (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal -1/3149280000 binary64) (.f64 angle (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 b b) (*.f64 a a))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 angle (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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))
#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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.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)))))))
#s(approx (* -1 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (/ (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) x-scale) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (* y-scale (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (* b (cos (* 1/180 (* angle (PI))))) 4)) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))))
#s(approx (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))
#s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))
#s(approx (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) angle) (*.f64 #s(literal -1/180 binary64) (PI.f64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))))))) x-scale))
#s(approx x-scale x-scale)
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))) x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.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 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.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 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (*.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (fma.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (*.f64 y-scale (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))) x-scale))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 x-scale x-scale))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) (.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 (.f64 x-scale x-scale) (fma.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 y-scale (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))) (.f64 x-scale x-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (*.f64 x-scale x-scale))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (-.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 x-scale x-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* 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 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 x-scale x-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* 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/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (*.f64 x-scale x-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 b b))) (*.f64 x-scale x-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (.f64 b b))) (*.f64 x-scale x-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 b b))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) (*.f64 x-scale x-scale)))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (.f64 b b)) (.f64 x-scale x-scale)))
#s(approx (* x-scale x-scale) (*.f64 x-scale x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (cos.f64 (.f64 #s(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 (.f64 b (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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))))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (cos.f64 (.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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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))))))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (cos.f64 (.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 (.f64 b (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (cos.f64 (.f64 #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 (.f64 b (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (cos.f64 (.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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (/.f64 (.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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (cos.f64 (.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 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))) (/.f64 (.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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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/2 binary64) (/.f64 (.f64 (.f64 x-scale 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 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 x-scale (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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 x-scale (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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 x-scale (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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 x-scale x-scale)) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 x-scale x-scale)) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (*.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b)) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (.f64 y-scale y-scale) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 x-scale (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 x-scale (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 x-scale (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (-.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.f64 (.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 (-.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.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 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.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 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (*.f64 x-scale x-scale))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (*.f64 x-scale x-scale)))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (*.f64 x-scale x-scale))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (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 (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.f64 (.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 (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.f64 (.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 (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (.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)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 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 y-scale y-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.f64 (.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 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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.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)))) (/ (/ (* (* (* 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 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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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/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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.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)))) (/ (/ (* (* (* 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 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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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/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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (*.f64 a a)))))))))))) y-scale))
#s(approx y-scale y-scale)
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))) y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -45 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (.f64 b b) (*.f64 a a)))))))))) y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (.f64 (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (*.f64 a a))))))))))))) y-scale))
#s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))
#s(approx (/ 1 (* y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
#s(approx (* y-scale y-scale) (*.f64 y-scale y-scale))
#s(approx (pow y-scale -4) (pow.f64 y-scale #s(literal -4 binary64)))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (.f64 (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 x-scale (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))) y-scale))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (.f64 a a)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) (.f64 a a)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (.f64 y-scale y-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (-.f64 (fma.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (/.f64 (-.f64 (fma.f64 (.f64 y-scale y-scale) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 a a)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (.f64 y-scale y-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 y-scale y-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 y-scale y-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 y-scale y-scale)))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 y-scale y-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))))) (*.f64 y-scale y-scale)))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 x-scale x-scale)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (pow.f64 x-scale #s(literal 4 binary64)))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 x-scale x-scale)) (.f64 a a)) (.f64 y-scale y-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (.f64 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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))))))))) y-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 y-scale 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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.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 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))))) y-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 y-scale 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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (.f64 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.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 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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)))))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.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 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))) y-scale))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))))))) 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 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 y-scale y-scale)))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 y-scale y-scale))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 y-scale y-scale)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (*.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (*.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
#s(approx (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 y-scale y-scale)))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale))))))
#s(approx (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 y-scale y-scale)) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))))
#s(approx (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -1 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))))))
#s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 x-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (/ (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (* (* b b) (* (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 (.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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (.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 x-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.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)))) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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 (* x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (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 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-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 x-scale x-scale)))) (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 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))))))))))

eval1.9s (7.1%)

Memory: -12.3MiB live, 2 163.1MiB allocated; 1.1s collecting garbage
Compiler: Compiled 104 289 to 11 600 computations (88.9% saved)

prune940.0ms (3.6%)

Memory

-20.8MiB live, 1 587.0MiB allocated; 257ms collecting garbage

Pruning

63 alts after pruning (60 fresh and 3 done)

	Pruned	Kept	Total
New	825	34	859
Fresh	19	26	45
Picked	2	3	5
Done	0	0	0
Total	846	63	909

Accuracy

76.4%

Counts

909 → 63

Alt Table

Click to see full alt table

Status	Accuracy	Program
	10.0%	(.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 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 (/ (/ (* (* (* 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)))))) (PI.f64)))
	14.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 #s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (cos.f64 #s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (cos.f64 #s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) x-scale) y-scale))) (PI.f64)))
	15.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 #s(approx (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #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))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	10.8%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 #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)))) 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 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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 #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))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) #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(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(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.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 #s(approx (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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)))
	17.9%	(.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 (+.f64 #s(approx (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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)))
	8.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 a a))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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.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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))
	8.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 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 #s(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (.f64 b b)) (.f64 x-scale x-scale))) #s(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)))
	5.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 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 b b))) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
	2.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 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale #s(approx (- (/ ( a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
	9.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 #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	8.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 #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
	20.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 #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (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)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (*.f64 b b)))))))) (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)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
	7.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) #s(approx (/ ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.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 1/2 binary64) (/.f64 (.f64 x-scale #s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) y-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)))))))))) (PI.f64)))
	20.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (fma.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (fma.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) x-scale))) (.f64 (.f64 b b) (.f64 (fma.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (PI.f64)))
✓	20.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)))))))))) (PI.f64)))
	20.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 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) x-scale))) (.f64 (exp.f64 (.f64 (log.f64 b) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (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 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))))) (PI.f64)))
	20.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 #s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)))))))))) (PI.f64)))
	20.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale #s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) 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)))))))))) (PI.f64)))
	28.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))
	28.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))) #s(literal 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 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
	26.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) #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 #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)))
	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 -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 b b))) #s(literal 2 binary64))) #s(approx (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 b b))))) (.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)))
	23.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 (+.f64 (sqrt.f64 #s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (fma.f64 #s(literal 1/45 binary64) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 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 (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)))
	28.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 (+.f64 (sqrt.f64 #s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 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 (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)))
	28.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 (+.f64 (sqrt.f64 #s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (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)))
	28.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 (+.f64 (sqrt.f64 #s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (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)))
	21.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 #s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 x-scale (.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)))
	19.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (fma.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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.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 #s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.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)))
	22.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (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)))
▶	42.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
✓	42.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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)))
	34.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(approx ( x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64)))
▶	42.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))
	36.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))) (.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)))
	42.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #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)))
	34.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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)))))) (PI.f64)))
	34.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -2 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))))))) (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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))))))) (PI.f64)))
	7.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
✓	9.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
	8.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
	4.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (exp.f64 (.f64 (log.f64 y-scale) #s(literal -4 binary64))))))) (.f64 angle (PI.f64))))))) (PI.f64)))
▶	4.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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
	34.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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
▶	17.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))) (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)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (PI.f64)))
	20.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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)))
	37.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
	37.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)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))) (PI.f64)))

Compiler

Compiled 21 901 to 10 658 computations (51.3% saved)

series739.0ms (2.8%)

Memory

53.6MiB live, 1 078.3MiB allocated; 159ms collecting garbage

Counts

100 → 405

Calls

Call 1

Inputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
(.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(literal -1/2 binary64)
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
y-scale
(+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))
(pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
#s(literal 4 binary64)
(pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))
#s(literal 2 binary64)
(.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))
x-scale
(.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64)))
#s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))
#s(literal 0 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64)))))
(.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))
#s(literal -90 binary64)
(/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64)))
(.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))
(.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))
(-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64))))
#s(literal 1 binary64)
(exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))
(*.f64 (log.f64 y-scale) #s(literal 2 binary64))
(log.f64 y-scale)
(sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))
(pow.f64 y-scale #s(literal -4 binary64))
#s(literal -4 binary64)
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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))))))))))
(.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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))))))))
(/.f64 (.f64 y-scale (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))))
(.f64 y-scale (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(+.f64 #s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64))
(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 x-scale (.f64 (cos.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 #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 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))
#s(literal -1 binary64)
(/.f64 #s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(*.f64 a a)
a
(+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))
(pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))
(pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(*.f64 x-scale x-scale)
(/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(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))
b
(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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))) (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1/2 (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (+ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (+ (* (pow a 2) (- (+ (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* 90 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (+ (* 90 (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))))) (* 90 (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (+ (* 90 (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))) (* (pow a 2) (+ (* 90 (* (pow a 2) (- (* -1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))) (* -1 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))) (pow b 2)))))) (* 90 (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow a 2) (+ (* -1 (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow a 2) (+ (* -1 (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow a 2) (+ (* -1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (/ (* (* (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 4))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow a 6))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow a 6) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1 (/ (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 6))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 90 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))))) (pow a 4))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 90 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))))) (pow a 4))) (+ (* 90 (/ (- (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))))) (* -1 (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))))))))) (pow a 6))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -1 (/ (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow a 2)))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow a 2))) (* -1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow a 2))) (+ (* -1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1/2 (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* 90 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (+ (* 90 (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))))) (* 90 (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (+ (* 90 (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))) (* (pow b 2) (+ (* 90 (* (pow b 2) (- (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))) (* -1 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))) (pow a 2)))))) (* 90 (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (/ (pow (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow b 2) (+ (* -1 (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow b 2) (+ (* -1 (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow b 2) (+ (* -1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (/ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx b #s(hole binary64 b))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))) (pow b 6))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow b 6) (* x-scale (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow b 6))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* 90 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))))) (pow b 4))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* 90 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))))) (pow b 4))) (+ (* 90 (/ (- (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))))) (* -1 (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))))))))) (pow b 6))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -1 (/ (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow b 2)))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow b 2))) (* -1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow b 2))) (+ (* -1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow b 2) (+ (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (cos (* 1/180 (* angle (PI)))) 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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))))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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))))))) (* 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/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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 (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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))))))) (* 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/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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))))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (* 180 (/ (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))) (* angle (* x-scale (* (PI) (sin (* 1/2 (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (* angle (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)) (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* x-scale (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (* angle (- (* 180 (/ (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (+ (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/2 (/ (- (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)) (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* x-scale (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2))))) (* (PI) (sin (* 1/2 (PI))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)) (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* x-scale (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))))) angle)))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (+ (* angle (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4))))))) (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (+ (* angle (+ (* angle (* y-scale (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))) (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))) (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (+ (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/2 (/ (- (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))) (* y-scale (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4))))))))) (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))) (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))))) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (+ (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/2 (/ (- (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))))))))) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (sqrt (pow (sin (* 1/2 (PI))) 4))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (* 1/90 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))) (* 1/2 (/ (* angle (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2))))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))) (* angle (+ (* 1/2 (/ (* angle (- (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2))))) (sqrt (pow (sin (* 1/2 (PI))) 4)))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (pow (sin (* 1/2 (PI))) 4)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (+ (* 1/45 (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* angle (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* angle (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))))) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (pow (sin (* 1/2 (PI))) 2)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* 1/90 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* 1/180 (* angle (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* x-scale (* (pow (PI) 2) (cos (* 1/2 (PI))))))) (* 1/180 (* x-scale (* (PI) (sin (* 1/2 (PI))))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* angle (* x-scale (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI))))))))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* angle (* x-scale (* (pow (PI) 4) (cos (* 1/2 (PI))))))) (* x-scale (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* 1/180 (* angle (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* 1/180 (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (sin (* 1/2 (PI))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (cos (* 1/2 (PI))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (sin (* 1/2 (PI))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (cos (* 1/2 (PI))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/3149280000 (* angle (* (pow (PI) 4) (cos (* 1/2 (PI)))))))))))))))
#s(approx (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 (/ (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* angle (PI))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 360 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* x-scale (PI)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 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)))))))) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* x-scale (PI)))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/2 (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))) (* x-scale (PI)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* x-scale (PI)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 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))))))) (PI))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 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))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 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)))))))) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* 2 y-scale)))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* -1/16200 (* (pow angle 2) (* y-scale (pow (PI) 2)))) (* 2 y-scale))))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* 2 y-scale) (* (pow angle 2) (+ (* -1/16200 (* y-scale (pow (PI) 2))) (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* 2 y-scale) (* (pow angle 2) (+ (* -1/16200 (* y-scale (pow (PI) 2))) (* (pow angle 2) (+ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/2 (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))))))))))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 2))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ 2 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (+ (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/2 (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))))))))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 1))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/2 (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (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)))))))))
#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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/180 (* angle (* x-scale (PI))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (PI))) (* (pow angle 2) (* x-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (PI))) (* (pow angle 2) (+ (* x-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* (pow angle 2) (* x-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (PI))) (* (pow angle 2) (+ (* x-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* (pow angle 2) (+ (* x-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* (pow angle 2) (* x-scale (+ (* -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)))) (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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 y-scale 2)) (+ (sqrt (pow (- (/ (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 (- (+ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (* (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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4)))))))) (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* -1 (+ (* -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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4))))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4))))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (* -1 (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 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))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4)))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 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))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4)))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (pow b 2))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (pow b 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))) (pow b 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))) (pow b 2)))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow a 2) (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2)))))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4)))))))) (* (pow a 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow angle 2) (+ (* (pow a 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2)))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* 1/2 (/ (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4))))))))) (* (pow a 2) (+ (* -1/3149280000 (pow (PI) 4)) (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4)))))))))))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow angle 2) (+ (* (pow a 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2)))) (* (pow angle 2) (+ (* (pow a 2) (+ (* -1/3149280000 (pow (PI) 4)) (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4))))))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/2 (/ (- (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))) (* -1/102036672000000 (/ (* (pow (PI) 6) (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2))))) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4))))))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* 1/2 (/ (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4))))))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (+ (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* 1/2 (/ (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4))))))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (+ (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/2 (/ (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4))))) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/2 (/ (- (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))) (* -1/102036672000000 (/ (* (pow (PI) 6) (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2))))) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4))))))))))))))))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 2) (sqrt (* 1/1049760000 (pow (PI) 4))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* -1/102036672000000 (/ (* (pow angle 2) (pow (PI) 6)) (sqrt (* 1/1049760000 (pow (PI) 4)))))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* (pow angle 2) (+ (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4))))) (* 1/2 (/ (* (pow angle 2) (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2))))) (sqrt (* 1/1049760000 (pow (PI) 4)))))))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* (pow angle 2) (+ (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))) (* -1/102036672000000 (/ (* (pow (PI) 6) (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2))))) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2))))) (sqrt (* 1/1049760000 (pow (PI) 4))))) (* 1/2 (/ (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4)))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* 1/1049760000 (* (pow angle 4) (pow (PI) 4)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* (pow angle 4) (+ (* -1/51018336000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1049760000 (pow (PI) 4))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/51018336000000 (pow (PI) 6)) (* (pow angle 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/51018336000000 (pow (PI) 6)) (* (pow angle 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (+ (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))))))))))))))
#s(approx (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 (/ (/ (* (* (* 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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (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)))))) #s(hole binary64 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 4)))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 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 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -45 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -45 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* -45 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* angle (* y-scale (* (PI) (* (pow (sqrt (pow b 4)) 3) (- (pow b 2) (pow a 2))))))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) #s(hole binary64 (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (pow (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)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (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 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (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)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (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 (/ (- (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (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 (* 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -45 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 45 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* y-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 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (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))) (sqrt (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 b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (- (pow b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 2) (pow a 2)))))))))))) y-scale)))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -90 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* -45 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2)))))))))) y-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -90 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -45 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))) (* -45 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* angle (* x-scale (* (PI) (* (pow (sqrt (pow a 4)) 3) (- (pow b 2) (pow a 2))))))))))))) y-scale)))
#s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(hole binary64 0))
#s(approx (/ 1 (exp (* (log y-scale) 2))) #s(hole binary64 (/ 1 (pow y-scale 2))))
#s(approx (exp (* (log y-scale) 2)) #s(hole binary64 (pow y-scale 2)))
#s(approx (* (log y-scale) 2) #s(hole binary64 (* 2 (log y-scale))))
#s(approx (log y-scale) #s(hole binary64 (log y-scale)))
#s(approx (pow y-scale -4) #s(hole binary64 (/ 1 (pow y-scale 4))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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) (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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/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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -45 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* (log y-scale) 2) #s(hole binary64 (* -2 (log (/ 1 y-scale)))))
#s(approx (log y-scale) #s(hole binary64 (* -1 (log (/ 1 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 45 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))))

Calls

15 calls:

Time	Variable		Point	Expression
75.0ms	angle	@	-inf	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) 1/180 (* angle (PI)) angle (PI) (* 1/2 (PI)) 1/2 4 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) 2 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) 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))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* angle (PI)))) -90 (/ (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* angle (PI))) (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4)))) (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))) (/ 1 (exp (* (log y-scale) 2))) 1 (exp (* (log y-scale) 2)) (* (log y-scale) 2) (log y-scale) (sqrt (pow y-scale -4)) (pow y-scale -4) -4 (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (cos (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a a) a (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) b (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))))
73.0ms	y-scale	@	0	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) 1/180 (* angle (PI)) angle (PI) (* 1/2 (PI)) 1/2 4 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) 2 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) 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))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* angle (PI)))) -90 (/ (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* angle (PI))) (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4)))) (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))) (/ 1 (exp (* (log y-scale) 2))) 1 (exp (* (log y-scale) 2)) (* (log y-scale) 2) (log y-scale) (sqrt (pow y-scale -4)) (pow y-scale -4) -4 (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (cos (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a a) a (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) b (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))))
46.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) 1/180 (* angle (PI)) angle (PI) (* 1/2 (PI)) 1/2 4 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) 2 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) 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))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* angle (PI)))) -90 (/ (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* angle (PI))) (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4)))) (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))) (/ 1 (exp (* (log y-scale) 2))) 1 (exp (* (log y-scale) 2)) (* (log y-scale) 2) (log y-scale) (sqrt (pow y-scale -4)) (pow y-scale -4) -4 (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (cos (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a a) a (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) b (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))))
46.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) 1/180 (* angle (PI)) angle (PI) (* 1/2 (PI)) 1/2 4 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) 2 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) 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))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* angle (PI)))) -90 (/ (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* angle (PI))) (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4)))) (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))) (/ 1 (exp (* (log y-scale) 2))) 1 (exp (* (log y-scale) 2)) (* (log y-scale) 2) (log y-scale) (sqrt (pow y-scale -4)) (pow y-scale -4) -4 (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (cos (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a a) a (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) b (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))))
44.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) 1/180 (* angle (PI)) angle (PI) (* 1/2 (PI)) 1/2 4 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) 2 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) 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))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -90 (/ (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* angle (PI)))) -90 (/ (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* angle (PI))) (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4)))) (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))) (/ 1 (exp (* (log y-scale) 2))) 1 (exp (* (log y-scale) 2)) (* (log y-scale) 2) (log y-scale) (sqrt (pow y-scale -4)) (pow y-scale -4) -4 (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (cos (* 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)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a a) a (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) b (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))))

rewrite647.0ms (2.5%)

Memory

2.0MiB live, 738.3MiB allocated; 172ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	3683	116059
0	3816	108943
0	13365	106708

Stop Event

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

Counts

505 → 584

Calls

Call 1

Inputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
(.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(literal -1/2 binary64)
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
y-scale
(+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))
(pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
#s(literal 4 binary64)
(pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))
#s(literal 2 binary64)
(.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))
x-scale
(.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64)))
#s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))
#s(literal 0 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64)))))
(.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))
#s(literal -90 binary64)
(/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64)))
(.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))
(.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))
(-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64))))
#s(literal 1 binary64)
(exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))
(*.f64 (log.f64 y-scale) #s(literal 2 binary64))
(log.f64 y-scale)
(sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))
(pow.f64 y-scale #s(literal -4 binary64))
#s(literal -4 binary64)
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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))))))))))
(.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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))))))))
(/.f64 (.f64 y-scale (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))))
(.f64 y-scale (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(+.f64 #s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64))
(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 x-scale (.f64 (cos.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 #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 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))
#s(literal -1 binary64)
(/.f64 #s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(*.f64 a a)
a
(+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))
(pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))
(pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(*.f64 x-scale x-scale)
(/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(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))
b
(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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* -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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (* -1/2 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))) (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1/2 (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (+ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (- (+ (* (pow a 2) (- (+ (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (/ (* y-scale (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* 90 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (+ (* 90 (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))))) (* 90 (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 2) (PI))))) (* (pow a 2) (+ (* 90 (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI)))))) (* (pow a 2) (+ (* 90 (* (pow a 2) (- (* -1/2 (/ (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3))))))) (* -1 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (PI))))) (pow b 2)))) (pow b 2)))))) (* 90 (- (* -1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))))) (* angle (* (pow b 2) (* (PI) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))))) (* angle (* (pow b 2) (PI)))) (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (pow b 4) (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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow a 2) (+ (* -1 (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow a 2) (+ (* -1 (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow a 2) (+ (* -1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (+ (* 1/2 (/ (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 4) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx a #s(hole binary64 a))
#s(approx (/ (/ (* (* (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 4))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow a 6))) (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow a 6) (* x-scale (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1 (/ (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 6))) (/ (* (pow b 2) (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 90 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))))) (pow a 4))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))) (pow a 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))) (+ (* 90 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI))))))) (pow a 4))) (+ (* 90 (/ (- (* 1/2 (/ (* (pow b 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2)))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow y-scale 4))) 3))))))) (* -1 (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (pow b 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow y-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow y-scale 4))))))) (* -1 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* angle (PI)))))))))) (pow a 6))) (* 90 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow b 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow y-scale 4))))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (PI))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))) (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow a 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow a 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -1 (/ (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow a 2)))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow a 2))) (* -1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow a 2))) (+ (* -1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (* (pow x-scale 2) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow a 6) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow a 4) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3)))))) (* -1 (/ (- (* 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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1/2 (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (- (+ (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))))) (* x-scale (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (/ (* y-scale (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* 90 (* (pow b 2) (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (+ (* 90 (* (pow b 2) (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))))) (* 90 (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 2) (* angle (PI))))) (* (pow b 2) (+ (* 90 (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI)))))) (* (pow b 2) (+ (* 90 (* (pow b 2) (- (* 1/2 (/ (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3))))))) (* -1 (/ (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* angle (PI))))) (pow a 2)))) (pow a 2)))))) (* 90 (- (* 1/2 (/ (* x-scale (* y-scale (- (/ 1 (pow x-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))))) (* (pow a 2) (* angle (* (PI) (sqrt (/ (pow a 4) (pow y-scale 4)))))))) (* -1 (/ (- (/ (* x-scale (* y-scale (+ (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4))))))) (/ 1 (pow x-scale 2))))) (* (pow a 2) (* angle (PI)))) (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* (pow a 4) (* 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2))))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/ (pow (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))))) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 3))) (* 1/2 (/ (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) 2)))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (/ (pow (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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow b 2) (+ (* -1 (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* (pow b 2) (+ (* -1 (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow b 2) (+ (* -1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (/ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (* (pow x-scale 2) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3)))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (/ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* 1/2 (/ (* (pow b 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2)))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))))))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 3))) (* 1/2 (/ (- (pow (cos (* 1/180 (* angle (PI)))) 4) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx b #s(hole binary64 b))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* x-scale (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))) (pow b 6))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))))))) (* (pow b 6) (* x-scale (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (+ (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow b 6))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* 90 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))))) (pow b 4))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2))))) (* angle (PI)))) (+ (* 90 (/ (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI))))))) (pow b 4))) (+ (* 90 (/ (- (* -1/2 (/ (* (pow a 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2)))))) (* angle (* x-scale (* y-scale (* (PI) (pow (sqrt (/ 1 (pow x-scale 4))) 3))))))) (* -1 (* (pow a 2) (- (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (pow a 4) (* (pow x-scale 4) (* (pow y-scale 4) (pow (sqrt (/ 1 (pow x-scale 4))) 2))))))) (* angle (* (PI) (sqrt (/ 1 (pow x-scale 4))))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* angle (PI)))))))))) (pow b 6))) (* 90 (/ (- (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (pow a 2) (* (pow x-scale 2) (* (pow y-scale 2) (sqrt (/ 1 (pow x-scale 4)))))))))) (* angle (PI))) (/ (* (pow a 2) (* x-scale (* y-scale (+ (sqrt (/ 1 (pow x-scale 4))) (/ 1 (pow x-scale 2)))))) (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (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) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2))))) (* (pow b 6) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 3)))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (pow (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) 2)))) (* (pow b 4) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -1 (/ (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow b 2)))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow b 2))) (* -1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (/ (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (pow b 2))) (+ (* -1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* 1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow b 2) (+ (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (* (pow x-scale 2) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3))))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (+ (/ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+ (* -1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2)))))) (* (pow b 6) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 3)))) (+ (* 1/2 (/ (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) 2))) (* (pow b 4) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))) (+ (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (cos (* 1/180 (* angle (PI)))) 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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))))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 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))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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)))))) (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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))))))) (* 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/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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 (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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))))))) (* 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/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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))))))))) (* 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/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 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)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow b 4)) (pow b 2)) (+ (* -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 (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (* 180 (/ (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))) (* angle (* x-scale (* (PI) (sin (* 1/2 (PI))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (* angle (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)) (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* x-scale (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (* angle (- (* 180 (/ (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (+ (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/2 (/ (- (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4))))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)) (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* x-scale (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2))))) (* (PI) (sin (* 1/2 (PI))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)) (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* x-scale (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (pow (sin (* 1/2 (PI))) 2)))))) angle)))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (+ (* angle (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4))))))) (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (+ (* angle (+ (* angle (* y-scale (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))) (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))) (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (+ (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/2 (/ (- (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))) (* y-scale (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4))))))))) (* y-scale (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))) (* y-scale (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))))) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (+ (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/2 (/ (- (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))))))))) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (sqrt (pow (sin (* 1/2 (PI))) 4))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (* 1/90 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))) (* 1/2 (/ (* angle (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2))))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/2 (PI))) 4)) (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (sqrt (pow (sin (* 1/2 (PI))) 4)))) (* angle (+ (* 1/2 (/ (* angle (- (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2))))))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2))))) (sqrt (pow (sin (* 1/2 (PI))) 4)))) (* 1/2 (/ (- (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))) (pow (sqrt (pow (sin (* 1/2 (PI))) 4)) 2)))) (sqrt (pow (sin (* 1/2 (PI))) 4)))))))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (pow (sin (* 1/2 (PI))) 4)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (+ (* 1/45 (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* angle (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* angle (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))))) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (pow (sin (* 1/2 (PI))) 2)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* 1/90 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* 1/180 (* angle (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* x-scale (* (pow (PI) 2) (cos (* 1/2 (PI))))))) (* 1/180 (* x-scale (* (PI) (sin (* 1/2 (PI))))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* angle (* x-scale (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI))))))))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* angle (* x-scale (* (pow (PI) 4) (cos (* 1/2 (PI))))))) (* x-scale (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* 1/180 (* angle (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* 1/180 (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (sin (* 1/2 (PI))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (cos (* 1/2 (PI))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (sin (* 1/2 (PI))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (cos (* 1/2 (PI))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/3149280000 (* angle (* (pow (PI) 4) (cos (* 1/2 (PI)))))))))))))))
#s(approx (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 (/ (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* angle (PI))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4)))))) (* angle (PI)))))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 360 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* x-scale (PI)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 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)))))))) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* x-scale (PI)))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/2 (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))) (* x-scale (PI)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* x-scale (PI)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 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))))))) (PI))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 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))) (- (* -1/90 (/ (* y-scale (PI)) x-scale)) (* 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)))))))) (* 64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* 2 y-scale)))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* -1/16200 (* (pow angle 2) (* y-scale (pow (PI) 2)))) (* 2 y-scale))))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* 2 y-scale) (* (pow angle 2) (+ (* -1/16200 (* y-scale (pow (PI) 2))) (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* 2 y-scale) (* (pow angle 2) (+ (* -1/16200 (* y-scale (pow (PI) 2))) (* (pow angle 2) (+ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))) (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/2 (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))))))))))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 2))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ 2 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ 2 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (+ (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/2 (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))))))))))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 1))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/2 (* (pow angle 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4))))))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (+ (* -1/16200 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/408146688000000 (pow (PI) 6)) (* -1/6122200320000000 (pow (PI) 6)))) (* -1/32400 (* (pow (PI) 2) (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (pow (PI) 4)))))))) (* 1/2 (+ (* 1/6298560000 (pow (PI) 4)) (* 1/2099520000 (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)))))))))
#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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/180 (* angle (* x-scale (PI))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (PI))) (* (pow angle 2) (* x-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (PI))) (* (pow angle 2) (+ (* x-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* (pow angle 2) (* x-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (PI))) (* (pow angle 2) (+ (* x-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* (pow angle 2) (+ (* x-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* (pow angle 2) (* x-scale (+ (* -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)))) (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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 y-scale 2)) (+ (sqrt (pow (- (/ (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 (- (+ (* (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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow 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 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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2))))) (pow (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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 (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) 2)))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (/ (* (pow 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)))))) (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))))))) (/ (pow a 2) (pow y-scale 2))) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (* (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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4)))))))) (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* -1 (+ (* -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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4))))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4))))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (* -1 (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (pow b 4)) (pow b 2)) (pow x-scale 2))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 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))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4)))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 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))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (* (pow x-scale 2) (sqrt (pow b 4))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (sqrt (pow b 4)))))))) (+ (/ (sqrt (pow b 4)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (pow b 2))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4)))))) (pow b 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))) (pow b 2)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow b 4)) (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (/ (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (pow angle 2) (+ (* 1/2 (/ (- (+ (* 2 (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* 2 (* (pow b 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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* 2 (* (pow b 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (/ (* (pow b 4) (pow (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2)) (pow (sqrt (pow b 4)) 2))))) (pow (sqrt (pow b 4)) 2))) (sqrt (pow b 4)))) (+ (* (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) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (sqrt (pow b 4))))))) (pow b 2)))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow a 2) (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2)))))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4)))))))) (* (pow a 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow angle 2) (+ (* (pow a 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2)))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* 1/2 (/ (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4))))))))) (* (pow a 2) (+ (* -1/3149280000 (pow (PI) 4)) (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4)))))))))))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow angle 2) (+ (* (pow a 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2)))) (* (pow angle 2) (+ (* (pow a 2) (+ (* -1/3149280000 (pow (PI) 4)) (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4))))))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/2 (/ (- (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))) (* -1/102036672000000 (/ (* (pow (PI) 6) (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2))))) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4))))))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* 1/2 (/ (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4))))))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (+ (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* 1/2 (/ (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4))))))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (+ (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/2 (/ (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4))))) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/2 (/ (- (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))) (* -1/102036672000000 (/ (* (pow (PI) 6) (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2))))) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4))))))))))))))))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 2) (sqrt (* 1/1049760000 (pow (PI) 4))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* -1/102036672000000 (/ (* (pow angle 2) (pow (PI) 6)) (sqrt (* 1/1049760000 (pow (PI) 4)))))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* (pow angle 2) (+ (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4))))) (* 1/2 (/ (* (pow angle 2) (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2))))) (sqrt (* 1/1049760000 (pow (PI) 4)))))))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 2) (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* (pow angle 2) (+ (* -1/102036672000000 (/ (pow (PI) 6) (sqrt (* 1/1049760000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))) (* -1/102036672000000 (/ (* (pow (PI) 6) (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2))))) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2))))) (sqrt (* 1/1049760000 (pow (PI) 4))))) (* 1/2 (/ (- (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* 1/10411482432835584000000000000 (/ (pow (PI) 12) (pow (sqrt (* 1/1049760000 (pow (PI) 4))) 2)))) (sqrt (* 1/1049760000 (pow (PI) 4)))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* 1/1049760000 (* (pow angle 4) (pow (PI) 4)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* (pow angle 4) (+ (* -1/51018336000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1049760000 (pow (PI) 4))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/51018336000000 (pow (PI) 6)) (* (pow angle 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/51018336000000 (pow (PI) 6)) (* (pow angle 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (+ (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))))))))))))))
#s(approx (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 (/ (/ (* (* (* 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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (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)))))) #s(hole binary64 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) #s(hole binary64 (* -1 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) #s(hole binary64 (/ (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 4)))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 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 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (/ (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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)))) (sqrt (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 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 (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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/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)))) (sqrt (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 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4)))))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -45 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (sqrt (pow b 4)) (pow b 2))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (pow b 4))))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -45 (/ (* y-scale (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))) (* angle (* (PI) (* (sqrt (pow b 4)) (- (pow b 2) (pow a 2))))))) (* -45 (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (/ (pow a 4) (pow y-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (pow b 4)) 2))))))) (* angle (* y-scale (* (PI) (* (pow (sqrt (pow b 4)) 3) (- (pow b 2) (pow a 2))))))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) #s(hole binary64 (* x-scale (* y-scale (- (/ 1 (pow y-scale 2)) (sqrt (/ 1 (pow y-scale 4))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (pow (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)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (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 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (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)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (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 (/ (- (* (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 (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (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 (* 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* x-scale (+ (* -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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* -45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -45 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))) (* (pow x-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (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 (* x-scale (+ (* -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))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2)))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 2))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (sqrt (/ (pow a 4) (pow y-scale 4))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 45 (/ (* y-scale (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2))))) (* angle (* (pow x-scale 4) (* (PI) (* (sqrt (/ (pow a 4) (pow y-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 45 (/ (* (pow a 2) (* (pow b 2) (- (pow b 4) (/ (* (pow a 4) (pow b 4)) (* (pow y-scale 4) (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 2)))))) (* angle (* (pow x-scale 6) (* y-scale (* (PI) (* (pow (sqrt (/ (pow a 4) (pow y-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* y-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow y-scale 2) (sqrt (/ (pow a 4) (pow y-scale 4)))))) (pow b 2))) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* y-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 (/ (* x-scale (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (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))) (sqrt (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 b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (- (pow b 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -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)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3) (- (pow b 2) (pow a 2)))))))))))) y-scale)))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* x-scale (* (pow y-scale 2) (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -90 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* -45 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2)))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2)))))))))) y-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -90 (/ (* x-scale (+ (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (pow a 4))))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -45 (/ (* x-scale (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))) (* angle (* (PI) (* (sqrt (pow a 4)) (- (pow b 2) (pow a 2))))))) (* -45 (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (/ (pow b 4) (pow x-scale 4)) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (pow a 4)) 2))))))) (* angle (* x-scale (* (PI) (* (pow (sqrt (pow a 4)) 3) (- (pow b 2) (pow a 2))))))))))))) y-scale)))
#s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(hole binary64 0))
#s(approx (/ 1 (exp (* (log y-scale) 2))) #s(hole binary64 (/ 1 (pow y-scale 2))))
#s(approx (exp (* (log y-scale) 2)) #s(hole binary64 (pow y-scale 2)))
#s(approx (* (log y-scale) 2) #s(hole binary64 (* 2 (log y-scale))))
#s(approx (log y-scale) #s(hole binary64 (log y-scale)))
#s(approx (pow y-scale -4) #s(hole binary64 (/ 1 (pow y-scale 4))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (+ (* -1 (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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 (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow 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) (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))))) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (pow y-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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/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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* x-scale (* y-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* -45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* -45 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* (log y-scale) 2) #s(hole binary64 (* -2 (log (/ 1 y-scale)))))
#s(approx (log y-scale) #s(hole binary64 (* -1 (log (/ 1 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 (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 6) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3)))) (+ (/ (* (pow a 2) (pow (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 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))) (* (pow y-scale 4) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (+ (/ (* (pow a 2) (pow (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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 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)))) (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 3) (- (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 (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (sqrt (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)) (+ (/ (* (pow a 2) (pow (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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 (+ (* -90 (/ (* x-scale (- (pow a 2) (* -1 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (sqrt (/ (pow b 4) (pow x-scale 4)))))))) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (+ (* 45 (/ (* x-scale (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2))))) (* angle (* (pow y-scale 4) (* (PI) (* (sqrt (/ (pow b 4) (pow x-scale 4))) (- (pow b 2) (pow a 2)))))))) (+ (* 45 (/ (* (pow a 2) (* (pow b 2) (- (pow a 4) (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 4) (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 2)))))) (* angle (* x-scale (* (pow y-scale 6) (* (PI) (* (pow (sqrt (/ (pow b 4) (pow x-scale 4))) 3) (- (pow b 2) (pow a 2))))))))) (* 90 (/ (* x-scale (+ (sqrt (/ (pow b 4) (pow x-scale 4))) (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))))))))

Outputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
(.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(literal -1/2 binary64)
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (neg.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (neg.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
y-scale
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
(+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))
(fabs.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))
(pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))
(exp.f64 (.f64 (log.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64)))
(fma.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
#s(literal 4 binary64)
(.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))
#s(literal 2 binary64)
(.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))
x-scale
(.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 #s(literal 1/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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))) (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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64)))))) (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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64)))
#s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))
#s(literal 0 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64)))))
(.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))
#s(literal -90 binary64)
(.f64 (/.f64 x-scale angle) (/.f64 (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (PI.f64)))
(/.f64 (neg.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (neg.f64 (.f64 angle (PI.f64))))
(/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64)))
(.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))
(.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))
(-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))
(pow.f64 (*.f64 y-scale y-scale) #s(literal -1 binary64))
(pow.f64 y-scale #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))
(exp.f64 (neg.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64))))
#s(literal 1 binary64)
(*.f64 (fabs.f64 y-scale) (fabs.f64 y-scale))
(*.f64 (neg.f64 y-scale) (neg.f64 y-scale))
(*.f64 (exp.f64 (log.f64 y-scale)) (exp.f64 (log.f64 y-scale)))
(*.f64 y-scale y-scale)
(pow.f64 (exp.f64 (log.f64 y-scale)) #s(literal 2 binary64))
(pow.f64 y-scale #s(literal 2 binary64))
(fabs.f64 (*.f64 y-scale y-scale))
(exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64))))
(*.f64 (log.f64 y-scale) #s(literal 2 binary64))
(log.f64 y-scale)
(pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 binary64))))
(sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))
(fabs.f64 (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))
(pow.f64 (pow.f64 y-scale #s(literal 4 binary64)) #s(literal -1 binary64))
(pow.f64 y-scale #s(literal -4 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 y-scale #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))
(exp.f64 (*.f64 (log.f64 y-scale) #s(literal -4 binary64)))
#s(literal -4 binary64)
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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))))))))))
(.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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))))))))
(.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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 (neg.f64 (.f64 y-scale (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (pow.f64 (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)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
(/.f64 (.f64 y-scale (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))))
(.f64 y-scale (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 #s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) #s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (-.f64 (.f64 (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 #s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
(+.f64 #s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64))
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(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 (fabs.f64 (.f64 #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)))) (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 #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 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale))))) (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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))
(.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))
#s(literal -1 binary64)
(/.f64 (neg.f64 #s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 #s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(*.f64 (fabs.f64 a) (fabs.f64 a))
(*.f64 (neg.f64 a) (neg.f64 a))
(*.f64 a a)
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
a
(/.f64 (+.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)) (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
(+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))
(fabs.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))
(pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))
(.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(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 (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 (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)))
b
(*.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 (fabs.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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 b b) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.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 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b))))) (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.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 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 a a) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))) (.f64 b b))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 b b) (.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)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))) (.f64 b b)))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 b b)))) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 b #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (cos.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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 #s(literal 90 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 b b))))) (.f64 #s(literal 90 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (.f64 b b)))) (.f64 b b))))) (.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -4 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (.f64 b b) (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (pow.f64 b #s(literal 4 binary64)) (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (fma.f64 (/.f64 (.f64 b b) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 a a) (fma.f64 #s(literal -1 binary64) (fma.f64 (/.f64 (.f64 b b) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 a a) (fma.f64 #s(literal -1 binary64) (fma.f64 (/.f64 (.f64 b b) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (fma.f64 (.f64 a a) (fma.f64 (/.f64 (.f64 b b) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (fma.f64 (/.f64 (.f64 b b) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (fma.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (fma.f64 (/.f64 (.f64 b b) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (fma.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (fma.f64 (.f64 a a) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(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 (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (* a a) (*.f64 a a))
#s(approx a a)
#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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 x-scale (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(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 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 x-scale (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 (.f64 (.f64 b b) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (PI.f64))) (*.f64 a a)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (PI.f64))) (.f64 a a))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 6 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (+.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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 (.f64 b b) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 a a))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 (.f64 b b) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 a a)) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 (.f64 b b) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 a a)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (.f64 (.f64 a a) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (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 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (pow.f64 (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (pow.f64 (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (pow.f64 (.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 (/ (/ (* (* (* 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 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)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 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)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 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)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (.f64 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)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.f64 (.f64 #s(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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.f64 (.f64 #s(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 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 x-scale (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 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 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (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 x-scale (.f64 (cos.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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 #s(literal 90 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a))))) (.f64 #s(literal 90 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle (PI.f64))))) (.f64 a a)))) (.f64 a a))))) (.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 x-scale #s(literal -4 binary64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))))) (.f64 (.f64 a a) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (fma.f64 (/.f64 (.f64 a a) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (fma.f64 (/.f64 (.f64 a a) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (fma.f64 (/.f64 (.f64 a a) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (fma.f64 (.f64 b b) (fma.f64 (/.f64 (.f64 a a) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (fma.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))) (fma.f64 (/.f64 (.f64 a a) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (fma.f64 (.f64 b b) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))))))) (fma.f64 (/.f64 (.f64 a a) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (+.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 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (+.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) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (+.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) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (- (pow b 2) (pow a 2)) (-.f64 (.f64 b b) (.f64 a a)))
#s(approx b b)
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.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)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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)))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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 a a) (.f64 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 x-scale (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/.f64 y-scale x-scale) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 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 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (fma.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.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)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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)))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 x-scale (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (fma.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.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))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 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)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (.f64 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)))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (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))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (*.f64 angle (PI.f64)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64))) (.f64 b b)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64)))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64))) (.f64 b b))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64)))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 y-scale (.f64 (PI.f64) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 3/2 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 x-scale #s(literal -4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 (PI.f64) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 6 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (/.f64 (-.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))))) (.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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (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 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))) (/.f64 (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3/2 binary64)))) (+.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 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 a (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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 (.f64 a a) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 b b))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 (.f64 a a) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 b b)) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 (.f64 a a) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 b b)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (.f64 (.f64 b b) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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)) (.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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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)) (.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 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 (.f64 x-scale x-scale) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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)) (.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (pow.f64 (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (pow.f64 (.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 (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 b b) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 (/.f64 (.f64 a a) (.f64 b b)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (pow.f64 (.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 (/ (/ (* (* (* 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (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 (.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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #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 -1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (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 (.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/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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/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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (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 (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 angle (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) angle))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 angle (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (.f64 x-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 x-scale (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) angle))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 angle (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/45 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (.f64 y-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (.f64 x-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (.f64 x-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 x-scale (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (.f64 x-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (.f64 x-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 y-scale (.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 x-scale (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))) (/.f64 (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) angle))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (fma.f64 angle (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (fma.f64 angle (fma.f64 angle (.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (fma.f64 angle (fma.f64 angle (fma.f64 angle (.f64 y-scale (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/45 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))) (.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (.f64 angle (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (.f64 angle (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (.f64 angle (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/45 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 angle (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 angle (-.f64 (fma.f64 #s(literal 1/45 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (fma.f64 #s(literal 1/45 binary64) (.f64 angle (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (.f64 angle (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (.f64 angle (fma.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (.f64 angle (fma.f64 #s(literal 1/45 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 angle (fma.f64 #s(literal -1/64800 binary64) (.f64 angle (.f64 (.f64 (PI.f64) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 angle (fma.f64 #s(literal -1/64800 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/34992000 binary64) (.f64 angle (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* angle (PI)) (*.f64 angle (PI.f64)))
#s(approx angle angle)
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (fma.f64 #s(literal 1/90 binary64) (.f64 angle (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 angle (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 angle (fma.f64 #s(literal -1/32400 binary64) (pow.f64 (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (.f64 (PI.f64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (.f64 angle (fma.f64 #s(literal -1/5832000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/17496000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 angle (.f64 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal 1/180 binary64) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 angle (.f64 x-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (.f64 angle (.f64 x-scale (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 x-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 angle (.f64 (.f64 (PI.f64) (PI.f64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 angle (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 angle (fma.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 angle (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/3149280000 binary64) (.f64 angle (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (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 (/ (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (* angle (PI))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))))
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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 (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (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 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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/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 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 (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (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 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))) (.f64 x-scale (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 y-scale (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 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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/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)))))))) (PI.f64)) (fma.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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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/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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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/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 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 (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (*.f64 #s(literal 2 binary64) y-scale))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 y-scale (.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 2 binary64) y-scale)))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (fma.f64 #s(literal 2 binary64) y-scale (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 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)) (fma.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (fma.f64 #s(literal 2 binary64) y-scale (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 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)) (fma.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 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)) (fma.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/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 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 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)) (fma.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+.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/2 binary64) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/2099520000 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)) (.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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (*.f64 x-scale (PI.f64)))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (PI.f64)) (.f64 (.f64 angle angle) (.f64 x-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)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 x-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 (.f64 angle angle) (.f64 x-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))))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (PI.f64)) (.f64 (.f64 angle angle) (fma.f64 x-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 (.f64 angle angle) (fma.f64 x-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 (.f64 angle angle) (.f64 x-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)))))))))))))))
#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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (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 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (*.f64 x-scale x-scale))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (.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 (.f64 b b) (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 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale)))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.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 #s(literal -1 binary64) (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 (.f64 b b) (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 (*.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))))))
#s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1 binary64) (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 (.f64 b b) (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 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.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 #s(literal -1 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))))))))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale)))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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 (.f64 b b) (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 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (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 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (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)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.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 (.f64 b b) (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 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 b b)))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (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 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (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))) (fma.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 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #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 (.f64 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 b b))))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (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))) (fma.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 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (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))))) (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 #s(literal 2 binary64) (.f64 (.f64 b b) (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 (.f64 b b) (.f64 (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 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (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))))))) (pow.f64 (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))))) #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (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))))) #s(literal 2 binary64))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (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 (.f64 (.f64 b b) (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)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (.f64 b b))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64)))))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (.f64 (.f64 angle angle) (fma.f64 (.f64 a a) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/32400 binary64) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (.f64 (.f64 angle angle) (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/32400 binary64) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64)))) (.f64 (.f64 angle angle) (fma.f64 (.f64 a a) (.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 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/16200 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))))))) (.f64 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))
#s(approx (* (* a a) (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (.f64 (.f64 angle angle) (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/32400 binary64) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64)))) (.f64 (.f64 angle angle) (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 1/1049760000 binary64) (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)) (fma.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))))) (.f64 #s(literal -1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (-.f64 (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/16200 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))))))) (.f64 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1 binary64)))))) (pow.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (.f64 (.f64 a a) (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 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/16200 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))))))) (.f64 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4 binary64))) (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 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4 binary64))) (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)) (fma.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 1/1049760000 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 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/16200 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))))))) (.f64 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4 binary64))) (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)) (fma.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 1/1049760000 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/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/16200 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))))))) (.f64 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 angle angle) (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/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))))) (.f64 #s(literal -1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (-.f64 (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/16200 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))))))) (.f64 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1 binary64)))))) (pow.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))))))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (.f64 (.f64 angle angle) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal -1/102036672000000 binary64) (/.f64 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (sqrt.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/16200 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))))))) (.f64 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))))) (.f64 #s(literal -1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (-.f64 (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/16200 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))))))) (.f64 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1 binary64)))))) (pow.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1 binary64)))))) (sqrt.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/16200 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))))))) (.f64 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (.f64 angle (PI.f64)) #s(literal 4 binary64))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal -1/51018336000000 binary64) (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/51018336000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal 1/16200 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)))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/51018336000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (fma.f64 #s(literal 1/16200 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))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))))))))))))))
#s(approx (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 (/ (/ (* (* (* 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 (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
#s(approx (sqrt (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (* 1/180 (* angle (PI)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
#s(approx (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)))))) (.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))))) (.f64 (cos.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)))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale))))
#s(approx (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)))
#s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(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 (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))
#s(approx (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 (/ (/ (* (* (* 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 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (.f64 #s(literal -1 binary64) (.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) angle) (*.f64 #s(literal -1/180 binary64) (PI.f64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))))))) x-scale))
#s(approx x-scale x-scale)
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))) x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (/ 1 (exp (* (log y-scale) 2))) (sqrt (pow y-scale -4))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))
#s(approx (* 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 x-scale (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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 x-scale (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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 x-scale (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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 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))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 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)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)))) (.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 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (.f64 b b))) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 y-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.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)))) (/ (/ (* (* (* 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 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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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/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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.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)))) (/ (/ (* (* (* 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 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))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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/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)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (.f64 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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))))) (.f64 (cos.f64 (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (*.f64 a a)))))))))))) y-scale))
#s(approx y-scale y-scale)
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))) y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -45 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64))))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (.f64 b b) (*.f64 a a)))))))))) y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))) (.f64 angle (.f64 (PI.f64) (.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (.f64 (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (*.f64 a a))))))))))))) y-scale))
#s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))
#s(approx (/ 1 (exp (* (log y-scale) 2))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
#s(approx (exp (* (log y-scale) 2)) (*.f64 y-scale y-scale))
#s(approx (* (log y-scale) 2) (*.f64 #s(literal 2 binary64) (log.f64 y-scale)))
#s(approx (log y-scale) (log.f64 y-scale))
#s(approx (pow y-scale -4) (pow.f64 y-scale #s(literal -4 binary64)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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)) (+.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 (.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 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))) (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow 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 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (.f64 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal -45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))))))
#s(approx (* (log y-scale) 2) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 y-scale))))
#s(approx (log y-scale) (*.f64 #s(literal -1 binary64) (neg.f64 (log.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)))) (.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))) (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (-.f64 (.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 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* 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 -90 binary64) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 x-scale x-scale) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64)))))) (.f64 angle (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 45 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (.f64 a b) #s(literal 4 binary64)) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1 binary64))))))) (.f64 angle (.f64 x-scale (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (PI.f64) (.f64 (pow.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 3/2 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))))

eval787.0ms (3%)

Memory: 23.4MiB live, 1 083.2MiB allocated; 218ms collecting garbage
Compiler: Compiled 69 046 to 6 840 computations (90.1% saved)

prune789.0ms (3%)

Memory

9.7MiB live, 1 486.0MiB allocated; 131ms collecting garbage

Pruning

79 alts after pruning (72 fresh and 7 done)

	Pruned	Kept	Total
New	473	23	496
Fresh	6	49	55
Picked	1	4	5
Done	0	3	3
Total	480	79	559

Accuracy

76.8%

Counts

559 → 79

Alt Table

Click to see full alt table

Status	Accuracy	Program
	10.0%	(.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 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 (/ (/ (* (* (* 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)))))) (PI.f64)))
	14.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 #s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (cos.f64 #s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(approx ( (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (cos.f64 #s(approx (* (/ angle 180) (PI)) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) x-scale) y-scale))) (PI.f64)))
	15.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 #s(approx (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #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))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	10.8%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 #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)))) 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 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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 #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))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) #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(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(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.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 #s(approx (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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)))
	17.9%	(.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 (+.f64 #s(approx (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	10.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 (.f64 #s(approx ( 2 (- (pow b 2) (pow a 2))) (.f64 #s(literal -2 binary64) (.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)))
	11.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 (.f64 #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))))))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	11.9%	(.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 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 #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)))))) x-scale) y-scale))) (PI.f64)))
	11.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 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 #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)))))) y-scale))) (PI.f64)))
	12.9%	(.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 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) #s(approx (/ (/ ( (* (* 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)))
	8.9%	(.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)))) #s(approx (* -1 (/ (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* x-scale x-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (/.f64 (.f64 b b) (.f64 x-scale x-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)) (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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 a a))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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.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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))
	8.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 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 #s(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (.f64 b b)) (.f64 x-scale x-scale))) #s(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)))
	5.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 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.f64 b b))) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
	2.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 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale #s(approx (- (/ ( a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
	9.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 #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	8.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 #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
	20.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 #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (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)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 x-scale x-scale))))) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (*.f64 b b)))))))) (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)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
	7.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) #s(approx (/ ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.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 1/2 binary64) (/.f64 (.f64 x-scale #s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) y-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)))))))))) (PI.f64)))
	20.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (fma.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (fma.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))) x-scale))) (.f64 (.f64 b b) (.f64 (fma.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (PI.f64)))
✓	20.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)))))))))) (PI.f64)))
	20.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 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) x-scale))) (.f64 (exp.f64 (.f64 (log.f64 b) #s(literal 2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (PI.f64)))
	20.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale #s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) 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)))))))))) (PI.f64)))
	28.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))
	28.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 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))) #s(literal 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 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
	26.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))) #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 #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)))
	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 -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 b b))) #s(literal 2 binary64))) #s(approx (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 b b))))) (.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)))
	28.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 (+.f64 (sqrt.f64 #s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 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 (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)))
	28.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 (+.f64 (sqrt.f64 #s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (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)))
	28.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 (+.f64 (sqrt.f64 #s(approx (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/2 binary64) (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)))
	21.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 #s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 x-scale (.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)))
	19.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (fma.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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.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 #s(approx (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.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)))
	22.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 a a) (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.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)))
	42.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (/.f64 (+.f64 (pow.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) #s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (-.f64 (.f64 (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 #s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))
	19.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (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)))
	33.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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (/.f64 (-.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)))))))) (PI.f64)))
✓	42.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
	27.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (PI.f64)))
	42.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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 #s(approx (+ ( 1/180 (* angle (PI))) (* 1/2 (PI))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 #s(approx (+ ( 1/180 (* angle (PI))) (* 1/2 (PI))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ ( 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
✓	42.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 #s(approx (pow (sin (+ ( 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (fma.f64 #s(literal 1/45 binary64) (.f64 angle (.f64 (PI.f64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
	41.8%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (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)))) (.f64 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)))
✓	42.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))
	35.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))) #s(approx (sin (* 1/180 (* angle (PI)))) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))) (PI.f64)))
	31.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (PI.f64)) (.f64 (.f64 angle angle) (.f64 x-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)))))))))))))) (PI.f64)))
	34.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64)))
	41.8%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (sin (+ ( 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
	36.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))) (.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)))
	42.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #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.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 x-scale) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
	43.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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 x-scale) (/.f64 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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))))))))))) (PI.f64)))
	34.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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)))))) (PI.f64)))
	34.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (PI.f64)))
	1.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (*.f64 angle (PI.f64))))))) (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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -2 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))))))) (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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))))))) (PI.f64)))
	2.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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cosh.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))))))) (PI.f64)))
	7.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
✓	9.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
	8.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
	4.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (exp.f64 (.f64 (log.f64 y-scale) #s(literal -4 binary64))))))) (.f64 angle (PI.f64))))))) (PI.f64)))
	4.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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
✓	4.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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
	4.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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (exp.f64 (neg.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
	34.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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
	4.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (.f64 (/.f64 x-scale angle) (/.f64 (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (PI.f64))))))) (PI.f64)))
✓	17.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))) (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)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (PI.f64)))
	37.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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
	37.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)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))) (PI.f64)))

Compiler

Compiled 21 655 to 8 661 computations (60% saved)

regimes490.0ms (1.9%)

Memory

-14.7MiB live, 699.3MiB allocated; 171ms collecting garbage

Counts

131 → 3

Calls

Call 1

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

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

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

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

Calls

11 calls:

77.0ms	x-scale
71.0ms	(/.f64 angle #s(literal 180 binary64))
39.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)))
39.0ms	b
39.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))

Results

Accuracy	Segments	Branch
47.8%	2	`(/.f64 angle #s(literal 180 binary64))`
47.8%	2	`(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))`
47.6%	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))
47.6%	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)))
47.6%	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))
47.6%	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.6%	5	`a`
55.9%	3	`b`
47.8%	2	`angle`
47.3%	2	`x-scale`
51.9%	4	`y-scale`

Compiler

Compiled 554 to 215 computations (61.2% saved)

regimes52.0ms (0.2%)

Memory

29.2MiB live, 75.7MiB allocated; 8ms collecting garbage

Counts

105 → 3

Calls

Call 1

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

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

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

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

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

Calls

1 calls:

32.0ms

Results

Accuracy	Segments	Branch
55.9%	3	`b`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes45.0ms (0.2%)

Memory

-25.4MiB live, 65.9MiB allocated; 4ms collecting garbage

Counts

95 → 3

Calls

Call 1

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

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

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

Calls

1 calls:

25.0ms

Results

Accuracy	Segments	Branch
55.9%	3	`b`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes45.0ms (0.2%)

Memory

13.7MiB live, 63.1MiB allocated; 6ms collecting garbage

Counts

94 → 3

Calls

Call 1

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

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

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

Calls

1 calls:

26.0ms

Results

Accuracy	Segments	Branch
55.5%	3	`b`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes42.0ms (0.2%)

Memory

18.1MiB live, 64.0MiB allocated; 2ms collecting garbage

Counts

91 → 3

Calls

Call 1

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

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

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

Calls

1 calls:

23.0ms

Results

Accuracy	Segments	Branch
55.4%	3	`b`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes39.0ms (0.1%)

Memory

-33.2MiB live, 58.8MiB allocated; 4ms collecting garbage

Counts

81 → 3

Calls

Call 1

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

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

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

Calls

1 calls:

22.0ms

Results

Accuracy	Segments	Branch
55.0%	3	`b`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes36.0ms (0.1%)

Memory

5.2MiB live, 55.4MiB allocated; 5ms collecting garbage

Counts

74 → 3

Calls

Call 1

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

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

Calls

1 calls:

21.0ms

Results

Accuracy	Segments	Branch
54.9%	3	`b`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes31.0ms (0.1%)

Memory

2.0MiB live, 47.2MiB allocated; 2ms collecting garbage

Counts

67 → 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (*.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (.f64 (/.f64 x-scale angle) (/.f64 (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (PI.f64))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (exp.f64 (.f64 (log.f64 y-scale) #s(literal -4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 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) #s(approx (/ ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.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)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) 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 #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -2 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (.f64 x-scale (.f64 y-scale #s(approx (- (/ ( a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (.f64 x-scale #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (exp.f64 (neg.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 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 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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)))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))) (.f64 #s(literal 1/180 binary64) (.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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cosh.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #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 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 #s(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (.f64 b b)) (.f64 x-scale x-scale))) #s(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 -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (PI.f64)) (.f64 (.f64 angle angle) (.f64 x-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)))))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))) (.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 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.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 -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))) #s(approx (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)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale #s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) 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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(approx ( x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 x-scale) (/.f64 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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))))))))))) (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 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) #s(approx (/ (/ ( (* (* 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 #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)))))) 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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (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)))) (.f64 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 angle (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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (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)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 #s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 #s(approx (+ ( 1/180 (* angle (PI))) (* 1/2 (PI))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 #s(approx (+ ( 1/180 (* angle (PI))) (* 1/2 (PI))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ ( 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 b b))) #s(literal 2 binary64))) #s(approx (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 b b))))) (.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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (sin (+ ( 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 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 x-scale #s(approx (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale))))) (/.f64 (-.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64)))) y-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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 x-scale (.f64 (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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 x-scale) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (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) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (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)))

Calls

1 calls:

18.0ms

Results

Accuracy	Segments	Branch
53.3%	2	`b`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes30.0ms (0.1%)

Memory

5.9MiB live, 50.3MiB allocated; 5ms collecting garbage

Counts

58 → 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (*.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (.f64 (/.f64 x-scale angle) (/.f64 (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (PI.f64))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (exp.f64 (.f64 (log.f64 y-scale) #s(literal -4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 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) #s(approx (/ ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.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)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) 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 #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -2 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (.f64 x-scale (.f64 y-scale #s(approx (- (/ ( a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (.f64 x-scale #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (exp.f64 (neg.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 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 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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)))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))) (.f64 #s(literal 1/180 binary64) (.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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cosh.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #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 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 #s(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (.f64 b b)) (.f64 x-scale x-scale))) #s(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 -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (PI.f64)) (.f64 (.f64 angle angle) (.f64 x-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)))))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))) (.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 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.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 -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))) #s(approx (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)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale #s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) 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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(approx ( x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 x-scale) (/.f64 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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))))))))))) (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 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) #s(approx (/ (/ ( (* (* 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 #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)))))) 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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (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)))) (.f64 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 angle (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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (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)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 #s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 #s(approx (+ ( 1/180 (* angle (PI))) (* 1/2 (PI))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 #s(approx (+ ( 1/180 (* angle (PI))) (* 1/2 (PI))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ ( 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 b b))) #s(literal 2 binary64))) #s(approx (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 b b))))) (.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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (sin (+ ( 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (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)))

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

Calls

1 calls:

19.0ms

Results

Accuracy	Segments	Branch
53.1%	2	`b`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes160.0ms (0.6%)

Memory

-18.9MiB live, 81.1MiB allocated; 10ms collecting garbage

Counts

57 → 3

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

19.0ms	b
15.0ms	a
14.0ms	y-scale

Results

Accuracy	Segments	Branch
49.5%	3	`y-scale`
46.1%	2	`a`
48.7%	3	`b`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes24.0ms (0.1%)

Memory

37.2MiB live, 37.3MiB allocated; 0ms collecting garbage

Counts

54 → 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (*.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (.f64 (/.f64 x-scale angle) (/.f64 (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (PI.f64))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (exp.f64 (.f64 (log.f64 y-scale) #s(literal -4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 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) #s(approx (/ ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.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)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) 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 #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -2 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (.f64 x-scale (.f64 y-scale #s(approx (- (/ ( a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (.f64 x-scale #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (exp.f64 (neg.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 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 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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)))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))) (.f64 #s(literal 1/180 binary64) (.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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cosh.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #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 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 #s(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (.f64 b b)) (.f64 x-scale x-scale))) #s(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 -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (PI.f64)) (.f64 (.f64 angle angle) (.f64 x-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)))))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))) (.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 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.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 -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))) #s(approx (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)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale #s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) 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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(approx ( x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 x-scale) (/.f64 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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))))))))))) (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 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) #s(approx (/ (/ ( (* (* 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 3/2 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (pow.f64 (pow.f64 y-scale #s(literal -4 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))))) (*.f64 angle (PI.f64))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (/.f64 #s(approx (+ (sqrt (pow (+ (pow ( a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 x-scale x-scale)))) (/.f64 (/.f64 #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)))))) 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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 binary64)) (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)))) (.f64 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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 b b) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))))) (.f64 angle (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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (.f64 angle (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64)))))))))) (.f64 angle (PI.f64))) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))) (.f64 angle (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)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 #s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 4) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) 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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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)))

Outputs

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

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

Calls

1 calls:

14.0ms

y-scale

Results

Accuracy	Segments	Branch
48.0%	2	`y-scale`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes146.0ms (0.6%)

Memory

-9.1MiB live, 186.0MiB allocated; 16ms collecting garbage

Counts

45 → 2

Calls

Call 1

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

Outputs

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

Calls

10 calls:

31.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))
15.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))
13.0ms	y-scale
13.0ms	(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
12.0ms	x-scale

Results

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

Compiler

Compiled 553 to 210 computations (62% saved)

regimes34.0ms (0.1%)

Memory

-21.4MiB live, 24.8MiB allocated; 2ms collecting garbage

Counts

44 → 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 x-scale #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))) (*.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (.f64 (/.f64 x-scale angle) (/.f64 (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64))))) (PI.f64))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (exp.f64 (.f64 (log.f64 y-scale) #s(literal -4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 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) #s(approx (/ ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (.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)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 -90 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b))) (.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)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (/.f64 (.f64 x-scale (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) 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 #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (-.f64 (.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (pow.f64 y-scale #s(literal -2 binary64)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (.f64 x-scale (.f64 y-scale #s(approx (- (/ ( a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (.f64 x-scale #s(approx (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (exp.f64 (neg.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 #s(approx ( x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 y-scale #s(literal 4 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 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (.f64 (.f64 a a) (sqrt.f64 (pow.f64 y-scale #s(literal -4 binary64)))))))) (.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 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (.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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.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)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (.f64 (.f64 a a) (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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 -1/90 binary64) (/.f64 (.f64 y-scale (PI.f64)) x-scale)) (.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)))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))) (.f64 #s(literal 1/180 binary64) (.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 (* 90 (/ (* x-scale (* y-scale (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cosh.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 y-scale) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 y-scale #s(literal -4 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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (.f64 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 -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #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 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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 (.f64 a a) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (pow.f64 #s(approx (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (.f64 b b)) (.f64 x-scale x-scale))) #s(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 -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (PI.f64)) (.f64 (.f64 angle angle) (.f64 x-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)))))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 #s(approx (+ (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))) (.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 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.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 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) #s(approx (+ (sqrt (pow (- (/ ( b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (.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 -1/2 binary64) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 #s(approx (sqrt (pow (cos ( 1/180 (* angle (PI)))) 4)) #s(literal 1 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)))) #s(approx (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)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale #s(approx (+ (sqrt (pow (* b (cos (* 1/180 (* angle (PI))))) 4)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) 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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 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 (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (.f64 b b)))) (.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) #s(approx (/ ( y-scale (+ (sqrt (pow (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) 2)) (+ (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (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 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(approx ( x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.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 (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2)) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)) (/ (pow (* b (sin (* 1/180 (* angle (PI))))) 2) (* y-scale y-scale))) 2))) (/ (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 4 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 (* (* b b) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (.f64 b b) (PI.f64))))))))) (PI.f64)))

Outputs

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

Calls

1 calls:

26.0ms

y-scale

Results

Accuracy	Segments	Branch
46.7%	2	`y-scale`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes50.0ms (0.2%)

Memory

-1.2MiB live, 44.2MiB allocated; 3ms collecting garbage

Counts

36 → 3

Calls

Call 1

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

Calls

3 calls:

24.0ms	a
10.0ms	b
9.0ms	y-scale

Results

Accuracy	Segments	Branch
42.0%	1	`a`
46.5%	3	`b`
42.0%	1	`y-scale`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes142.0ms (0.5%)

Memory

16.5MiB live, 156.5MiB allocated; 12ms collecting garbage

Counts

33 → 2

Calls

Call 1

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

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

Calls

11 calls:

27.0ms	y-scale
24.0ms	(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
18.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)))
9.0ms	(/.f64 angle #s(literal 180 binary64))
9.0ms	a

Results

Accuracy	Segments	Branch
40.3%	4	`y-scale`
39.1%	2	`a`
40.6%	4	`(/.f64 angle #s(literal 180 binary64))`
40.6%	4	`(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))`
37.9%	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))
37.9%	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)))
37.9%	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))
37.9%	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)))
40.6%	4	`angle`
40.4%	4	`x-scale`
40.5%	3	`b`

Compiler

Compiled 554 to 215 computations (61.2% saved)

regimes35.0ms (0.1%)

Memory

14.5MiB live, 54.8MiB allocated; 16ms collecting garbage

Counts

27 → 3

Calls

Call 1

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

Calls

2 calls:

22.0ms	b
7.0ms	a

Results

Accuracy	Segments	Branch
40.5%	3	`b`
38.0%	2	`a`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes7.0ms (0%)

Memory

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

Counts

14 → 3

Calls

Call 1

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

Calls

1 calls:

4.0ms

Results

Accuracy	Segments	Branch
40.2%	3	`b`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes14.0ms (0.1%)

Memory

-28.6MiB live, 17.5MiB allocated; 8ms collecting garbage

Counts

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

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

Calls

2 calls:

9.0ms	b
3.0ms	a

Results

Accuracy	Segments	Branch
38.0%	2	`a`
37.8%	2	`b`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes32.0ms (0.1%)

Memory

-10.9MiB live, 43.6MiB allocated; 16ms collecting garbage

Counts

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

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

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

Outputs

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

Calls

11 calls:

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

Results

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

Compiler

Compiled 554 to 215 computations (61.2% saved)

regimes16.0ms (0.1%)

Memory

7.8MiB live, 56.1MiB allocated; 3ms 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 (- (/ (* a a) (* y-scale y-scale)) (+ (sqrt (pow (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) 2)) (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (* -90 (/ (* x-scale (* y-scale (- (/ 1 (* y-scale y-scale)) (sqrt (pow y-scale -4))))) (* angle (PI)))) #s(literal 0 binary64))))) (PI.f64)))

Outputs

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

Calls

11 calls:

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)))
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	(.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))
1.0ms	(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))

Results

Accuracy	Segments	Branch
17.3%	1	`y-scale`
17.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))
17.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)))
17.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))
17.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)))
17.3%	1	`a`
17.3%	1	`b`
17.3%	1	`x-scale`
17.3%	1	`(/.f64 angle #s(literal 180 binary64))`
17.3%	1	`(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))`
17.3%	1	`angle`

Compiler

Compiled 554 to 215 computations (61.2% saved)

bsearch157.0ms (0.6%)

Memory

44.2MiB live, 275.2MiB allocated; 20ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
61.0ms	14107228902663146.0	138958396049698480.0
81.0ms	2.917145076394082e-154	1.3676643951298332e-152

Samples

50.0ms	59×	1	valid
40.0ms	36×	2	valid
25.0ms	106×	0	valid
11.0ms	7×	3	valid

Compiler

Compiled 5 374 to 2 458 computations (54.3% saved)

Precisions

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

ival-pow2: 24.0ms (20.6% of total)

ival-cosu: 23.0ms (19.7% of total)

ival-div!: 16.0ms (13.7% of total)

ival-sinu: 14.0ms (12% of total)

ival-mult!: 12.0ms (10.3% of total)

adjust: 11.0ms (9.4% of total)

ival-sub!: 8.0ms (6.9% of total)

ival-sqrt: 3.0ms (2.6% of total)

ival-add!: 2.0ms (1.7% of total)

ival-atan: 2.0ms (1.7% of total)

bsearch12.0ms (0%)

Memory

-27.5MiB live, 17.8MiB allocated; 5ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
3.0ms	14107228902663146.0	138958396049698480.0
3.0ms	2.917145076394082e-154	1.3676643951298332e-152

Compiler

Compiled 5 179 to 2 315 computations (55.3% saved)

bsearch8.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
3.0ms	14107228902663146.0	138958396049698480.0
3.0ms	2.917145076394082e-154	1.3676643951298332e-152

Compiler

Compiled 4 841 to 2 198 computations (54.6% saved)

bsearch26.0ms (0.1%)

Memory

-32.6MiB live, 16.2MiB allocated; 34ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
21.0ms	14107228902663146.0	138958396049698480.0
3.0ms	2.917145076394082e-154	1.3676643951298332e-152

Compiler

Compiled 4 815 to 2 211 computations (54.1% saved)

bsearch8.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
3.0ms	14107228902663146.0	138958396049698480.0
3.0ms	2.917145076394082e-154	1.3676643951298332e-152

Compiler

Compiled 4 971 to 2 445 computations (50.8% saved)

bsearch7.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
3.0ms	14107228902663146.0	138958396049698480.0
3.0ms	2.917145076394082e-154	1.3676643951298332e-152

Compiler

Compiled 4 828 to 2 354 computations (51.2% saved)

bsearch10.0ms (0%)

Memory

-29.2MiB live, 17.8MiB allocated; 5ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
5.0ms	14107228902663146.0	138958396049698480.0
3.0ms	2.917145076394082e-154	1.3676643951298332e-152

Compiler

Compiled 5 075 to 2 419 computations (52.3% saved)

bsearch77.0ms (0.3%)

Memory

43.5MiB live, 136.6MiB allocated; 4ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
68.0ms	138958396049698480.0	3.37938334911066e+18

Samples

26.0ms	37×	1	valid
21.0ms	19×	2	valid
14.0ms	56×	0	valid

Compiler

Compiled 2 832 to 1 297 computations (54.2% saved)

Precisions

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

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

ival-cosu: 9.0ms (16.4% of total)

ival-sinu: 8.0ms (14.6% of total)

adjust: 7.0ms (12.8% of total)

ival-div!: 7.0ms (12.8% of total)

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

ival-sub!: 2.0ms (3.6% of total)

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

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

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

bsearch19.0ms (0.1%)

Memory

-38.9MiB live, 11.7MiB allocated; 6ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
17.0ms	138958396049698480.0	3.37938334911066e+18

Compiler

Compiled 2 846 to 1 311 computations (53.9% saved)

bsearch231.0ms (0.9%)

Memory

44.1MiB live, 302.0MiB allocated; 60ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
112.0ms	6.296112651936613e+84	4.548747049398632e+85
106.0ms	-5.141016429442486e-264	-1.0323140199318492e-264

Samples

152.0ms	90×	1	valid
33.0ms	32×	2	valid
18.0ms	68×	0	valid
3.0ms	2×	3	valid

Compiler

Compiled 4 912 to 2 259 computations (54% saved)

Precisions

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

ival-pow2: 54.0ms (27.6% of total)

ival-sinu: 39.0ms (19.9% of total)

ival-div!: 29.0ms (14.8% of total)

ival-sub!: 24.0ms (12.3% of total)

ival-cosu: 18.0ms (9.2% of total)

adjust: 12.0ms (6.1% of total)

ival-mult!: 12.0ms (6.1% of total)

ival-sqrt: 3.0ms (1.5% of total)

ival-add!: 2.0ms (1% of total)

ival-atan: 2.0ms (1% of total)

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

bsearch63.0ms (0.2%)

Memory

9.4MiB live, 55.0MiB allocated; 12ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
57.0ms	0.019652243152953813	0.07737890828524618

Samples

22.0ms	17×	2	valid
19.0ms	31×	1	valid
7.0ms	30×	0	valid
3.0ms	2×	3	valid

Compiler

Compiled 2 117 to 976 computations (53.9% saved)

Precisions

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

ival-pow2: 10.0ms (21% of total)

ival-atan: 7.0ms (14.7% of total)

ival-cosu: 6.0ms (12.6% of total)

adjust: 5.0ms (10.5% of total)

ival-sinu: 5.0ms (10.5% of total)

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

ival-mult!: 5.0ms (10.5% of total)

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

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

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

bsearch3.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
2.0ms	0.019652243152953813	0.07737890828524618

Compiler

Compiled 2 117 to 976 computations (53.9% saved)

bsearch3.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
2.0ms	0.019652243152953813	0.07737890828524618

Compiler

Compiled 2 112 to 971 computations (54% saved)

bsearch263.0ms (1%)

Memory

-9.1MiB live, 186.9MiB allocated; 51ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
102.0ms	1.75730728913772e-6	3276.2196350706877
144.0ms	5.388049726631271e-170	2.2174476968423668e-166

Samples

77.0ms	59×	2	valid
59.0ms	6×	3	valid
51.0ms	72×	1	valid
42.0ms	135×	0	valid

Compiler

Compiled 5 697 to 2 851 computations (50% saved)

Precisions

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

adjust: 65.0ms (30% of total)

ival-cosu: 34.0ms (15.7% of total)

ival-pow2: 32.0ms (14.8% of total)

ival-sqrt: 21.0ms (9.7% of total)

ival-sinu: 20.0ms (9.2% of total)

ival-div!: 18.0ms (8.3% of total)

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

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

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

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

bsearch127.0ms (0.5%)

Memory

-22.8MiB live, 80.0MiB allocated; 58ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
119.0ms	2.47217541140243e-38	1.9840131546255945e-35

Samples

27.0ms	20×	2	valid
25.0ms	36×	1	valid
17.0ms	69×	0	valid
4.0ms	3×	3	valid

Compiler

Compiled 3 212 to 1 555 computations (51.6% saved)

Precisions

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

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

ival-pow2: 14.0ms (21.1% of total)

ival-cosu: 10.0ms (15.1% of total)

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

ival-mult!: 7.0ms (10.5% of total)

adjust: 6.0ms (9% of total)

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

ival-sub!: 2.0ms (3% of total)

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

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

bsearch63.0ms (0.2%)

Memory

8.5MiB live, 53.8MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
55.0ms	3276.2196350706877	8092.073606987682
3.0ms	5.388049726631271e-170	2.2174476968423668e-166

Samples

26.0ms	13×	2	valid
12.0ms	18×	1	valid
12.0ms	49×	0	valid

Compiler

Compiled 4 353 to 2 174 computations (50.1% saved)

Precisions

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

ival-sinu: 18.0ms (38.5% of total)

ival-pow2: 8.0ms (17.1% of total)

ival-cosu: 5.0ms (10.7% of total)

ival-div!: 4.0ms (8.6% of total)

ival-mult!: 4.0ms (8.6% of total)

adjust: 3.0ms (6.4% of total)

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

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

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

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

bsearch26.0ms (0.1%)

Memory

-14.9MiB live, 30.8MiB allocated; 3ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
21.0ms	3276.2196350706877	8092.073606987682
3.0ms	5.388049726631271e-170	2.2174476968423668e-166

Samples

7.0ms	10×	1	valid
6.0ms	18×	0	valid
4.0ms	4×	2	valid

Compiler

Compiled 4 704 to 2 278 computations (51.6% saved)

Precisions

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

ival-pow2: 3.0ms (18.6% of total)

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

ival-sinu: 2.0ms (12.4% of total)

ival-add!: 2.0ms (12.4% of total)

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

ival-div!: 2.0ms (12.4% of total)

adjust: 1.0ms (6.2% of total)

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

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

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

bsearch56.0ms (0.2%)

Memory

10.9MiB live, 59.6MiB allocated; 10ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
51.0ms	9.286334806606577e-185	2.5586767412665347e-184

Samples

21.0ms	22×	1	valid
11.0ms	46×	0	valid
9.0ms	9×	2	valid
6.0ms	3×	3	valid

Compiler

Compiled 1 922 to 901 computations (53.1% saved)

Precisions

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

ival-pow2: 14.0ms (32.5% of total)

ival-sinu: 7.0ms (16.3% of total)

ival-cosu: 6.0ms (13.9% of total)

adjust: 4.0ms (9.3% of total)

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

ival-mult!: 4.0ms (9.3% of total)

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

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

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

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

derivations732.0ms (2.8%)

Memory

16.5MiB live, 527.6MiB allocated; 49ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 395 to 480 computations (65.6% saved)

preprocess499.0ms (1.9%)

Memory

-1.0MiB live, 579.4MiB allocated; 179ms collecting garbage

Remove

(abs b)

(abs a)

Compiler

Compiled 36 041 to 14 435 computations (59.9% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze1.4s (5.3%)

sample7.3s (28%)

preprocess52.0ms (0.2%)

series580.0ms (2.2%)

rewrite580.0ms (2.2%)

eval140.0ms (0.5%)

prune116.0ms (0.4%)

series1.6s (6.1%)

rewrite1.0s (3.9%)

eval1.2s (4.7%)

prune741.0ms (2.8%)

series1.0s (3.9%)

rewrite702.0ms (2.7%)

eval1.9s (7.1%)

prune940.0ms (3.6%)

series739.0ms (2.8%)

rewrite647.0ms (2.5%)

eval787.0ms (3%)

prune789.0ms (3%)

regimes490.0ms (1.9%)

regimes52.0ms (0.2%)

regimes45.0ms (0.2%)

regimes45.0ms (0.2%)

regimes42.0ms (0.2%)

regimes39.0ms (0.1%)

regimes36.0ms (0.1%)

regimes31.0ms (0.1%)

regimes30.0ms (0.1%)

regimes160.0ms (0.6%)

regimes24.0ms (0.1%)

regimes146.0ms (0.6%)

regimes34.0ms (0.1%)

regimes50.0ms (0.2%)

regimes142.0ms (0.5%)

regimes35.0ms (0.1%)

regimes7.0ms (0%)

regimes14.0ms (0.1%)

regimes32.0ms (0.1%)

regimes16.0ms (0.1%)

bsearch157.0ms (0.6%)

bsearch12.0ms (0%)

bsearch8.0ms (0%)

bsearch26.0ms (0.1%)

bsearch8.0ms (0%)

bsearch7.0ms (0%)

bsearch10.0ms (0%)

bsearch77.0ms (0.3%)

bsearch19.0ms (0.1%)

bsearch231.0ms (0.9%)

bsearch63.0ms (0.2%)

bsearch3.0ms (0%)

bsearch3.0ms (0%)

bsearch263.0ms (1%)

bsearch127.0ms (0.5%)

bsearch63.0ms (0.2%)

bsearch26.0ms (0.1%)

bsearch56.0ms (0.2%)

derivations732.0ms (2.8%)

preprocess499.0ms (1.9%)

end0.0ms (0%)

Profiling